VBA 加载项不工作

Question

我有一个功能齐全的宏，我正在尝试将其转换为加载项，以便可以在所有 Excel 文档中使用它。但是我不能让它创建一个菜单。请帮忙。

首要任务：

我在运行 Mountain Lion 的 Mac 上使用 Office 2011-Excel

我的 .xlam 文件保存在正确的文件夹 Applications/Microsoft Office 2011/Office/Add-Ins

我已经使用工具/插件菜单正确安装了它

我的代码在 .xlam 文件的 This Worksheet 部分中

我的加载项的源代码可从所有文档中查看

我的代码如下：

Option Explicit

Dim cControl As CommandBarButton

Private Sub Workbook_Open()

On Error Resume Next 'Just in case

    Application.CommandBars("Worksheet Menu Bar").Controls("P Wave").Delete 'Delete any existing menu item that may have been left.
    Set cControl = Application.CommandBars("Worksheet Menu Bar").Controls.Add 'Add the new menu item and Set a CommandBarButton Variable to it

        With cControl 'Work with the Variable
            .Caption = "P Wave"
            .Style = msoButtonCaption
            .OnAction = "runSheet()"
            'Macro stored in a Standard Module
        End With
    On Error GoTo 0
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next 'In case it has already gone.

    Application.CommandBars("Worksheet Menu Bar").Controls("P Wave").Delete

    On Error GoTo 0

End Sub

我的宏菜单无法显示。请帮忙

Answer 1

在功能区上添加您的命令按钮，甚至您自己的选项卡，尽管您可能需要了解一些有关 RibbonX XML 的知识。它将恢复对 Excel 2007 的兼容性（我认为）。

This link 可以帮助您入门。

另外，This visual designer 可能会让你更兴奋。我没用过，但 Andy Pope 是 VBA 的佼佼者！