修改后的Excel“单元格”上下文菜单在表格中不起作用

时间:2014-12-12 15:40:25

标签: excel-vba contextmenu vba excel

我在Excel中为右键单击上下文菜单创建了一个新项目。当我右键单击表格中的单元格时,它不会出现在我的右键单击上下文菜单中。否则就会出现。我使用的代码(从网上复制)是:

Sub AddItemToContextMenu()
  Dim cmdNew As CommandBarButton
  Set cmdNew = CommandBars("cell").Controls.Add

  With cmdNew
    .Caption = "Copy Occurence Across"
    .OnAction = "CopyOccurrence"
    .BeginGroup = True
  End With
End Sub

当点击表格中的单元格时,我可以做些什么来使我的新项目出现?

1 个答案:

答案 0 :(得分:2)

要将控件添加到表项的右键单击上下文菜单,需要引用“列表范围弹出”上下文菜单。

CommandBars("List Range Popup").Controls.Add

请参阅以下帖子:Custom excel right click context menu gets overwritten by Quick Analysis defaults