OnAction自定义功能区按钮

时间:2014-04-07 15:50:46

标签: excel vba ribbon

这是我在Excel工作簿中的XML片段,它在我的功能区,自定义图标和文本中正确显示,但是当我点击图标时,我无法获得Sub" OpenSettings&#34 ;运行。我的潜艇在工作簿中,而不是在单独的模块中......

        <group id="customGroup3" label="Settings">
                <button id="button5" label="Manage Settings" size="large" onAction="OpenSettings" image="Info" />

            </group>

我需要添加什么才能使其工作? 我试过&#34; ThisDocument.OpenSettings&#34;没有运气

1 个答案:

答案 0 :(得分:0)

尝试将XML更改为:

<group id="customGroup3" label="Settings"> 
  <button id="button5" label="Manage Settings" size="large" onAction="launch_OpenSettings" image="Info" />
</group>

尝试将此代码添加到工作簿中的新模块中:

Sub launch_OpenSettings(control As IRibbonControl)
  Call OpenSettings
End Sub

每个按钮都需要回调(这些可以在自定义UI工具中生成):enter image description here