そんなときの覚書です。

【VBA】右クリックメニューの初期化はApplication.CommandBars("Cell").Reset」

右クリックのメニューがもう使っていないものまで、
ずらずらと表示されてしまっているという時は、

’右クリックメニューの初期化は
Application.CommandBars("Cell").Reset

で出来ます。
もはや、subで囲う必要もなく、

ダイアログボックスに入力してクリック！！これだけで終了です。

【VBA】右クリックのメニューにマクロを追加する方法

右クリックのメニューのVBAのプログラムを登録する方法は、下記の通りです。
※ダブルクリックでコピーできます。

'ブックが開いた時に、右クリックに登録
Private Sub Auto_Open()

    With CommandBars("Cell").Controls.Add(Before:=1)  '1が一番上
        .Caption = "RC_TEST(&P)" '表示名
        .OnAction = "TEST" 'プログラム名
    End With

End Sub
'ブックを閉じたときに、右クリックのメニューを消す。
Private Sub Auto_Close()
    
CommandBars("Cell").Controls("RC_TEST(&P)").Delete

End Sub

’実行するプログラム
Sub TEST()

MsgBox "右クリック"

End Sub

プログラム説明

メニューの登録と削除

上記の通り、

右クリックで登録するだけなら、

    With CommandBars("Cell").Controls.Add(Before:=1)  '1が一番上
        .Caption = "RC_TEST(&P)" '表示名
        .OnAction = "TEST" 'プログラム名
    End With

で終わりなのですが、
これを実行したままにすると、なんと、メニューがそのまま残り続けます。
※今回の場合、　「RC_TEST(&P)」　のメニューが残り続ける。

ですので、きちんとメニューを消すことが大事です。

そのプログラムが、

CommandBars("Cell").Controls("RC_TEST(&P)").Delete

となっています。
表示名と一致しないときちんと消えないので、ご注意ください。

Auto_Open()　Auto_Close()　との組み合わせ

メニューを作った後に、きちんと消す必要がありますので、
基本的にはAuto_Open()　Auto_Close()との相性が抜群になります。

そのブックを立ち上げたときに、自動的にメニューが追加されますので、
そのブックで使えるプログラムを登録しておきましょう！！

途中で落ちてしまった時、、

途中でプログラムが落ちてしまった時は、

メニューが残ったままになってしまいます。。
非常に邪魔ですので、

'右クリックのメニューの初期化は
Application.CommandBars("Cell").Reset

で、初期化してあげてください。
右クリックに常時追加してあるメニューも消えますのでご注意ください。