上下文菜单 - 隐藏所有按钮并仅添加我的按钮

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

.