Sorry found it on the MS Developer web...should have gone there first...
Sub DisableAllShortcutMenus()
Dim cb As CommandBar
For Each cb In CommandBars
If cb.Type = msoBarTypePopup Then cb.Enabled = False
Next cb
End Sub
This is a discussion on Jaun Pablo G...Mr MVP - Help Required within the Excel Questions forums, part of the Question Forums category; I noticed from searching the archives that you helped a poor soul with some pop-up menu related items. In short ...
I noticed from searching the archives that you helped a poor soul with some pop-up menu related items.
In short - I am trying to basically remove the shortcut menus from the sheet tabs in a workbook (I guess this is the standard shortcut menu??) - I know how to remove it I guess I just need to know how to call it? (or any shortcut menus for that matter)
Thanks a lot
Luke
Does my a$$ look big in this picture ?
Sorry found it on the MS Developer web...should have gone there first...
Sub DisableAllShortcutMenus()
Dim cb As CommandBar
For Each cb In CommandBars
If cb.Type = msoBarTypePopup Then cb.Enabled = False
Next cb
End Sub
Does my a$$ look big in this picture ?
Grin, saved me trying to find the specifice name.
Bookmarks