加载项无法在自定义用户界面

时间:2016-08-03 19:55:44

标签: excel-vba excel-2013 vba excel

我正在尝试使用基于此guidance的自定义UI创建我的第一个加载项。 (因为我没有Visual Studio,我正在使用VBA; Windows 7中的Excel 2013)

为了测试,我刚刚在一个模块中创建了一个sub:

Sub test()
    MsgBox "test"
End Sub

如指南中所述,我在其中创建了包含CustomUI.xml的CustomUI文件夹。 CustomUI.xml的内容:

<?xml version="1.0" encoding="utf-8"?>
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
  <ribbon>
    <tabs>
      <tab id="TestTab" label="Test tab" >
        <group id="TestGroup" label="Test group" >
          <button id="test" visible="true" size="large" 
                  label="Test Sub" 
                  onAction="test" />
        </group>
      </tab>
    </tabs>
  </ribbon>
</customUI>

还添加了 https://msdn.microsoft.com/en-us/library/office/gg597509(v=office.14).aspx
如上所述。。

现在我正确加载加载项,唯一的问题是点击新创建的功能区项目我一直收到以下错误信息(当我从VBA编辑器启动它时宏当然正常工作):<登记/> enter image description here

我做错了什么?

2 个答案:

答案 0 :(得分:2)

一旦您将Public Sub test(control As IRibbonControl)合并为suggetred Here并且如果您仍然收到错误,那么我相信其中一个打开的工作簿/加载项中存在其他代码,这些代码会干扰这段代码。

  1. 关闭所有其他打开的工作簿
  2. 检查是否有其他已安装的插件。

答案 1 :(得分:1)

添加&#39;控制作为IRibbonControl&#39;作为子程序的参数。

例如,如果您的子程序的名称是&#39;测试&#39;,然后

Sub test(control As IRibbonControl)
    'your code goes here
End Sub