How do i access "About Microsoft Excel" from the Help menu bar?

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" <(E-Mail Removed)> wrote in message news:A789C652-E80C-41DA-B1A4-(E-Mail Removed)...
> How do i access "About Microsoft Excel" from the Help menu bar?

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&Shield").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" <(E-Mail Removed)> wrote in message news:A789C652-E80C-41DA-B1A4-(E-Mail Removed)...
> > How do i access "About Microsoft Excel" from the Help menu bar?
>
>
>

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" <(E-Mail Removed)> wrote in message news:08969D7E-A6E0-48B9-AB39-(E-Mail Removed)...
>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&Shield").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" <(E-Mail Removed)> wrote in message news:A789C652-E80C-41DA-B1A4-(E-Mail Removed)...
>> > How do i access "About Microsoft Excel" from the Help menu bar?
>>
>>
>>