ZenMenu.Item



Item(vPosition As Variant) As ZenMenuItem

Parameters

vPosition As Variant
This parameter can either be a numerical value or a string.
Example: 0,1,2,... or "ID_FIRST", "ID_SECOND",...
ED
avaliable
RT
avaliable

Remarks

Returns a menu item by position or name of item.

Sample:


Sub ItemMenus()

Dim zMenus As ZenMenus  'Parent object
Dim zMenu As ZenMenu	'Child object of ZenMenus
Dim zMenuItem As ZenMenuItem 'Child object of ZenMenu

Set zMenus = MyWorkspace.ActiveDocument.ZenMenus

'Select a main menu
Set zMenu = zMenus.Item(1)

'Select the first item of the main menu
Set zMenuItem = zMenu.Item(0)
Debug.Print "Name of menu item = " & zMenuItem.Name

End Sub


See Also

ZenMenu, ZenMenuItem