|
ED
|
avaliable
|
RT
|
not used
|
The defined menu will be deleted. As this function works via
names there are no seperated properties for context or main menu
selection.
(context and main menu can not have the same names)
Sub DeleteMenus() Dim zMenus As ZenMenus 'Parent object Set zMenus = MyWorkspace.ActiveDocument.ZenMenus 'Delete context and main menus via their name zMenus.Delete ("main_menu") zMenus.Delete ("context_menu") End Sub