Excel Menulerinin komple kaybolması

[cabatur]

Excel Menulerimim hepsi yok oldu.Geri getiremiyorum.Bunu yanı sıra Sayfa üzerinde Sağ tuş fonksiyonu işlevliliğini yitirdi.

Daha açıklayıcı olması adına ekte Bir excel dosyamın resmini ve dosyayı koydum.

Sanıyorum ki Personal.Xls Macro sayfası takılı kalıyor.Bununla ilgili bilgisi olanlara dönüş yapabilirse çok sevinirim.

Şimdiden Teşekkürler

 

[muhasebeciyiz]

bu sayfadaki levent beyin makrosunu çalıştırınız

http://www.excel.web.tr/f136/personel-takip-program-305-1-3-1-t26024/sayfa2.html

veya bu linke bakınız

http://www.excel.web.tr/f48/worksheetmenubar-daki-gorunum-menusunu-geri-getirmek-t43138.html

 

[cabatur]

Aşağıdakimakroyu çalıştırabilmem için biri bir buton yapıp.Dosya ekleyebilirmi.

Dosyalarda Sağ tuş fonksiyonum gitti.

Lütfen

Sub Grnm()
Set cbrWMB = Application.CommandBars("Worksheet Menu Bar")
cbrWMB.Controls(3).visible = True
End Sub


yada


Sub goster()
For Each bar In Application.CommandBars
bar.Enabled = True
Next
End Sub