Adapt this example
Dim winHelpMenu As CommandBarControl
Set winHelpMenu = Application.CommandBars("Worksheet Menu Bar").Controls("Help")
winHelpMenu.Controls("About Microsoft Office Excel").Execute
--
Regards Ron de Bruin
http://www.rondebruin.nl
"ernie" wrote in message ...
I have this software installed with excel. its call ExcelShield. i need to
create a code to access "About" from ExcelShield menu bar.
I'm trying the code below but it does not work:
Sub test()
Application.CommandBars("Worksheet Menu
Bar").Controls.Application.CommandBars("Excel&Shie ld").Caption = _
"A&bout"
End Sub
--
help a friend help you
"Ron de Bruin" wrote:
Try
Sub test()
Application.CommandBars("Worksheet Menu Bar").FindControl _
(ID:=927, Recursive:=True).Execute
End Sub
See
http://www.rondebruin.nl/menuid.htm
--
Regards Ron de Bruin
http://www.rondebruin.nl
"ernie" wrote in message ...
How do i access "About Microsoft Excel" from the Help menu bar?