Excel VBA 上下文菜单

【问题标题】：Excel VBA Context MenuExcel VBA 上下文菜单
【发布时间】：2016-06-27 09:48:54
【问题描述】：

问题：当您尝试更改 ContextMenu("Cell")（在单元格中单击鼠标右键）时，有时您可以看到上下文菜单是如何变化的，但有时您却看不到。

你有没有想过为什么？我会分享它，这样我就可以节省其他新手的时间。

例如Ron de bruin'如何构建和更改 ContextMenu'

【问题讨论】：

标签： excel contextmenu custom-contextmenu vba

【解决方案1】：

原因： Excel 具有相同名称的不同 ContextMenu（在本例中为单元格），仅在特定情况下显示。例如，根据当前布局模式（分页预览或正常），它会调用不同的菜单。

解决方案：归功于MrExcel。

将不同的命令栏控件设置为：

Dim ContextMenu    as Commandbar
Dim ContextMenuPBP as CommandBar

Set ContextMenu = Application.CommandBars("Cell")
Set ContextMenuPBP = Application.CommandBars.FindControl(ID:=1588).Parent

现在您只需更改两个菜单，无论用户在哪种模式下工作，您都可以看到更改。

【讨论】：