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

i need help