Excel Menü Çubuğu

[m.gur]

Merhaba
Benim excel sayfamda ki tüm araç çubukları yok oldu. Standart, biçimlendirme v.s. hiçbiri yok. Sağ tıklanmıyor. Forumda arama yaptım aşağıdaki kodu denedim faydası olmadı. Ofisi kaldırıp yeniden yükledim yine olmadı.
Yardımcı olursanız çok sevinirim. Şimdiden teşekkür ederim

Sub auto_open()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = True
Next cb
End Sub

 

[İhsan Tank]

Merhaba
Benim excel sayfamda ki tüm araç çubukları yok oldu. Standart, biçimlendirme v.s. hiçbiri yok. Sağ tıklanmıyor. Forumda arama yaptım aşağıdaki kodu denedim faydası olmadı. Ofisi kaldırıp yeniden yükledim yine olmadı.
Yardımcı olursanız çok sevinirim. Şimdiden teşekkür ederim

Sub auto_open()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = True
Next cb
End Sub

merhaba
araç çubukları

Sub toolbar_disable()
For Each tb In Toolbars
tb.Visible = True
Next tb
MsgBox "Araç Çubukları Devrede", , "www.excel.web.tr"
End Sub

 

[m.gur]

Teşekkür ederim fakat yine olmadı.
Görünüm--->Araç çubukları--->Özelleştir Araççubukları sekmesi boş. Hiçbişey gözükmüyor.

 

[m.gur]

Arkadaşlar bilinen tüm çözümleri denedim yine olmadı. Bugün biigisayara format attım ofisi yeniden kurdum nafile. Çözüm önerilerinizi bekliyorm. Ekran görüntüsünü ekliyorum.

 

[kemalist]

Arkadaşlar bilinen tüm çözümleri denedim yine olmadı. Bugün biigisayara format attım ofisi yeniden kurdum nafile. Çözüm önerilerinizi bekliyorm. Ekran görüntüsünü ekliyorum.

BU KOD İŞİNE YARAR İSTERSEN EKTEKİ DOSYAYI BİLGİSAYARINA KAYDET VE ORADA KALSIN

Sub auto_open()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = True
Next cb
End Sub

 

[m.gur]

Çok teşekkür ederim. İşe yaradı. İyi çalışmalar

 

[kemalist]

Çok teşekkür ederim. İşe yaradı. İyi çalışmalar

Bir şey değil.İyi çalışmalar