Çalışma Sayfası Menü Çubuğu

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,715
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Altın Üyelik Bitiş Tarihi
04-01-2026
Merhaba,

http://www.excel.web.tr/f130/matbaa-maliyet-t70469.html linkteki dosyayı açtım ve...

Araç Çubuklarında, Çalışma Sayfası Menü Çubuğu yok oldu, (Çalışma Sayfası Menü Çubuğu kutucuğu da)

Geri getirebilmek için ne yapmalıyım ?

Teşekkür ederim.
 
Son düzenleme:

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Yeni bir boç excel dosyası açın.
Al+f11 ile Visual basıc düzenleyicisini açın.Boş bir modül ekleyin ve makroyu oluşturuup aşağıdaki kodları girin ve çalıştırın .İşlem tamamdır. :cool:
Kod:
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = True
 Next i
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,715
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Altın Üyelik Bitiş Tarihi
04-01-2026
Yeni bir boç excel dosyası açın.
Al+f11 ile Visual basıc düzenleyicisini açın.Boş bir modül ekleyin ve makroyu oluşturuup aşağıdaki kodları girin ve çalıştırın .İşlem tamamdır. :cool:
Kod:
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = True
 Next i
Sayın Evren Gizlen merhaba,

Private Sub CommandButton1_Click()
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = True
Next i
End Sub

Kod bu hali alacak sanırım ?
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Sayın Evren Gizlen merhaba,

Private Sub CommandButton1_Click()
For i = 1 To Application.CommandBars.Count
Application.CommandBars(i).Enabled = True
Next i
End Sub

Kod bu hali alacak sanırım ?
Ben kodu verdim.Siz dilediğiniz yerde(CommanButton'da dahil) kullanabilirsiniz.:cool:
 
Üst