vba sorunu

Katılım
11 Kasım 2007
Mesajlar
21
Excel Vers. ve Dili
Office 2003 - Türkçe ingilizce
arkadaşlar kolay gelsin. Bir sorunum var. Vba makroları hakkında pek bilgim yok ama bir program hazırladım. Bu programda Dosya, Düzen, Görünüm menülerinin olduğu araç çubuğunu kaybetmek için yine forumdan aşağıdaki kodlamayı aldım.

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

Kodlar çalıştı menüler iptal oldu yani ortadan kalktı. Ama bütün menüler gittiği için Dosya, Düzen araç çubuğunu geri çıkartamıyorum ve bütün excel dosyalarında aynı sorun var

Bu menüleri geri çıkarmam konusunda yardımcı olabilirmisiniz?
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,680
Excel Vers. ve Dili
Excel 2019 Türkçe
Kod:
Application.CommandBars(i).Enabled = False
satırındaki False değerini True yapmayı denediniz mi?
 
Katılım
11 Kasım 2007
Mesajlar
21
Excel Vers. ve Dili
Office 2003 - Türkçe ingilizce
Sayın Hamitcan şuan dosya düzen menüsü hiç görünmüyor bu yüzden vba sayfasına giremiyorum. Sorun oradan kaynaklanıyor. Yani False değerini True yapmam için vba sayfasına girmem lazım.:)
 
Katılım
11 Kasım 2007
Mesajlar
21
Excel Vers. ve Dili
Office 2003 - Türkçe ingilizce
Private Sub CommandButton2_Click()
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = True
Next i

gerekli olan komutlan anladığım kadarıyla ama vba sayfasına Dosya düzen menüsü olmadan nasıl girebilirim
 
Katılım
28 Haziran 2007
Mesajlar
246
Excel Vers. ve Dili
Excel 2003 Tr
Merhaba Alt+F11 tuş kombinasyonuyla VBA kod editörünü açabilirsiniz.
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,323
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Excel de Alt+F11 tuşlayın, editör penceresi açılacaktır...
 
Katılım
11 Kasım 2007
Mesajlar
21
Excel Vers. ve Dili
Office 2003 - Türkçe ingilizce
Eser Bey ve Haluk Bey çok teşekkür ederim.Sorunum Çözülmüştür.
 
Üst