Delete menu

Todd Huttenstine · Aug 21, 2004

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

Tom Ogilvy · Aug 21, 2004

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

Todd Huttenstine · Aug 21, 2004

Thank you

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

--
Regards,
Tom Ogilvy

.

Soo Cheon Jheong · Aug 22, 2004

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
_ _
^¢¯^
--