Excel VBA-如何在所有工作簿上具有右键单击上下文菜单?

时间:2018-06-28 16:17:56

标签: excel-vba vba excel

上下文菜单必须在工作表中设置。有没有一种方法可以将其放置在personal.XLSB工作簿中,无论我打开了哪个工作簿,都以某种方式添加了永久的附加右键单击菜单?

我的最终目标: 有几台个人计算机。XLSB引用了带有标准右键菜单选项的工作簿,因此我可以将此功能添加到数十台计算机中。

2 个答案:

答案 0 :(得分:0)

您可以在插件的customUI中添加以下“代码”

<contextMenus> 
    <contextMenu idMso="ContextMenuListRange"> 
        <menu idMso="WindowSwitchWindowsMenuExcel" insertBeforeMso="Cut" />     
        <button idMso="VisualBasic" insertBeforeMso="Cut" />
    </contextMenu>
</contextMenus> 

答案 1 :(得分:0)

我发现了一些解决方法,我认为...

我有一个Master xlsm文件,其中有创建和删除上下文菜单的所有子例程。

那我可以说...
此文件
ThatFile
另一个文件 我想使用Master的相同上下文菜单...

在每个示例中,我都将其添加到Workbook_Open:

Application.Run "Master.xlsm!AddContextMenuEntries"

您需要打开Master才能工作(如果需要的话,这只是另一行代码)。

但是现在,如果我在Master中编辑/更改/更新上下文菜单,当我重新打开它们时,它们将对所有其他文件可用。

希望有帮助。