- Katılım
- 28 Eylül 2007
- Mesajlar
- 9
- Excel Vers. ve Dili
- office2007
- Altın Üyelik Bitiş Tarihi
- 03/11/2018
hazırladığım bir çalışmada kullandığım kodlar diğer excel sayfalarınıda etkiliyor menü ve sağ tık olayı yok oluyor
Private Sub Workbook_Open()
Dim cb As CommandBar
Application.DisplayFormulaBar = True
For Each cb In Application.CommandBars
cb.Enabled = True
Next cb
With ActiveWindow
.DisplayHeadings = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End Sub
yukardakilerin hepsi false ama true yapmama rağmen sadece bu sayfada menü aktif diğerlerinde inaktif
Private Sub Workbook_Open()
Dim cb As CommandBar
Application.DisplayFormulaBar = True
For Each cb In Application.CommandBars
cb.Enabled = True
Next cb
With ActiveWindow
.DisplayHeadings = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End Sub
yukardakilerin hepsi false ama true yapmama rağmen sadece bu sayfada menü aktif diğerlerinde inaktif