Excel 2010形状自定义右键单击上下文菜单

好吧，我已经找了好几个小时了。我只是想找到excel形状（如矩形和自由表单）的右键单击上下文菜单的控件索引名称

我有下面的代码，我只想在用户右键单击形状时删除所有默认菜单项

在这里：

---

我相信它叫做“形状”。

仅供参考，形状的上下文菜单显然无法通过VBA访问，因此我必须为自定义文件编写自己的XML

---

这里有一篇解释文章：

只是好奇，但你为什么要努力“取消手续”？虽然我认为这是正确的，但通过VBA显然是不可接受的。谢谢你的回复！

For Each ShapeCommandBar In Application.CommandBars("Name of Shapes Context Menu").Controls
    ShapeCommandBar.Delete
Next ShapeCommandBar