Removing Command Buttons

This code shows you how to remove a command button from an existing Menu.

Public Sub BET_RemoveCommandFromTools() 
Dim objCommand As CommandBarPopup 

   Set objCommand = Application.CommandBars("Worksheet Menu Bar").Controls("Tools") 
   objCommand.Controls("Tools").Delete 
End Sub