コンテキストメニュー - すべてのボタンを非表示にして、ボタンのみを追加する

Question

Excelのコンテキストメニューからすべてのボタンを非表示にする方法を探しています。

どうすればいいですか？

Answer 1

私は同じ問題を得たときにこれを行う方法を見つけました。

アイテムを削除したい場合は

Sub RemoveItems()
    Application.CommandBars("Cell").Controls("Insert...").Delete
    Application.CommandBars("Cell").Controls("Cut").Delete
    Application.CommandBars("Cell").Controls("Copy").Delete
End Sub

.

またはすべての項目を削除したい場合は

Sub DeleteAll()
Set CtrlMenu = Application.CommandBars("Cell")
For Each Item In CtrlMenu.Controls
Item.Delete
Next
End Sub

.

もう一度復元したい場合は

Sub ResetMenu()
    Application.CommandBars("Cell").Reset
End Sub

.