Querying Submenu Items

[DATarbell]

I am trying to determine whether specific items appear in a
sub-menu, but I have been unable to get 'below' the primary
menu item level (e.g., Edit). Can anyone provide a code
sample that determines the presence/absence of a submenu item?

 

[Klaus Linke]

I am trying to determine whether specific items appear
in a sub-menu, but I have been unable to get 'below' the
primary menu item level (e.g., Edit). Can anyone provide
a code sample that determines the presence/absence of a
submenu item?

Hi DA,

You should be able to reference them through the name or index.

Whether they are "present/absent" depends on their .Visible property.

MsgBox CommandBars("Menu Bar").Controls("Edit").Controls("Copy").Visible
MsgBox CommandBars("Menu Bar").Controls(2).Controls(6).Visible

Klaus