Excel セルの右クリックメニューやサブメニューにマクロを登録／削除する

With CommandBars("Cell").Controls.Add(）

　.Caption="｛メニューに表示する名前｝"

　.OnAction="｛実行するマクロのメソッド名｝"

End With

先頭に追加するには

Add(Before:=1)

と書く

区切り線入れるならこう書く。この例では3番めの上に区切り。

Application.CommandBars("Cell").Controls(3).BeginGroup = True