Delete menu
 

Hey guys

I have a menu called "SMS Functions" on the menu toolbar
at the the top of Excel. Its next to the "Help" menu.

How do I programmatically delete this menu item?


Thank you
Todd Huttenstine

Delete menu
 

application.CommandBars("Worksheet Menu Bar").Controls("SMS
Functions").Delete

--
Regards,
Tom Ogilvy

"Todd Huttenstine" wrote in message
...
Hey guys

I have a menu called "SMS Functions" on the menu toolbar
at the the top of Excel. Its next to the "Help" menu.

How do I programmatically delete this menu item?


Thank you
Todd Huttenstine

Delete menu
 

Thank you

-----Original Message-----
application.CommandBars("Worksheet Menu Bar").Controls
("SMS
Functions").Delete

--
Regards,
Tom Ogilvy

"Todd Huttenstine"
wrote in message
...
Hey guys

I have a menu called "SMS Functions" on the menu toolbar
at the the top of Excel. Its next to the "Help" menu.

How do I programmatically delete this menu item?


Thank you
Todd Huttenstine


.

Delete menu
 

Todd,

Try
- - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Sub TEST()

Dim CTL As CommandBarControl
For Each CTL In Application.CommandBars(1).Controls
If Application.Trim(CTL.Caption) = "SMS Functions" Then
CTL.Delete
End If
Next

End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - -


--
Regards,
Soo Cheon Jheong
_ _
^¢¯^
--