I have a real simple routine that use to add a new command to the RightClick
Menu.

Sub CreateRightClick()
With Application.CommandBars("Cell").Controls.Add
.Caption = "Remove"
.OnAction = "Remove"
End With
End Sub

But for some reason, now it does not work. Nothing is add to the RightClick
menu. What I want is "Remove" added to the menu and when clicked, for it to
run the macro "Remove".

Two, can I add other commands with "Sub CreateRightClick2()". I have only
added one command before.


Any Help is Always Appreciated.