Menüler gizlendi geri getiremiyorum.

Katılım
30 Mayıs 2007
Mesajlar
73
Excel Vers. ve Dili
türkçe
Arkadaşlar merhaba
Aşağıdaki kodları yani menü ve kontrol menülerini gizleme kodlarını makroya atadım.fakat bir hata yaptım girişede çıkışada gizle kodlarını koymuşum

Şimdi bütün excel dosyalarımda menü ve control menüleri gizli geliyor.
Vbasic editörünede geçemiyom düzeltmek için.

Lütfen acil yardım edebilirmisiniz.


nziya

Giriş: 03/04/2005
Mesaj: 357
Excel Vers. ve Dili:
office xp tr

--------------------------------------------------------------------------------

Bu kodları bir forma yerleştiriniz
'ARAÇ ÇUBUKLARININ TAMAMINI GİZLE
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = False
Next i
Application.ScreenUpdating = True
End Sub
'ARAÇ ÇUBUKLARININ TAMAMINI GÃ?STER
Private Sub CommandButton2_Click()
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = True
Next i
End Sub
 
Katılım
30 Mayıs 2007
Mesajlar
73
Excel Vers. ve Dili
türkçe
Çok teşekkür ederim . büyük bir dertden kurtardınız beni
sağolun.
 
Üst