WorksheetMenubar daki görünüm menüsünü geri getirmek

[hsayar]

Çeşitli eklentiler ile kullandığım programımda worksheetmenubardaki görünüm menüsü kaybettim geri getiremiyorm.
Worksheetmenubar.reset demeden nasıl çözerim.
saygılarımla

 

[hsayar]

arkadaşlar cevap verebilecek biri yokmu menü göstermeye yarayan komut neydi

 

[hsayar]

kod sonunda aklıma geldi.

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