excel - 在功能区中添加自定义选项卡

Question

我正在尝试学习新的东西。我根据 Siddharth Rout 的教程创建了一个自定义选项卡。
XML部分是这样的

<customUI onLoad="RibbonOnLoad" xmlns="http://schemas.microsoft.com/office/2009/07/customui">
<ribbon startFromScratch="false">
<tabs>
<tab id="MyCustomTab" label="MyTab" insertAfterMso="TabView">
<group id="customGroup1" label="First Tab">
<button id="customButton1" label="JG Button 1" imageMso="HappyFace" size="large" onAction="Callback1" />
<button id="customButton2" label="JG Button 2" imageMso="PictureBrightnessGallery" size="large" onAction="Callback2" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>

然后在工作簿模块中，我输入此代码以便在工作簿打开时激活选项卡

Private myRibbon As IRibbonUI

Sub OnLoad(ribbon As IRibbonUI)
Set myRibbon = ribbon
myRibbon.ActivateTabMso ("MyTab")
End Sub

但是当我打开工作簿时，我遇到了一个错误 Can't run the macro RibbonOnLoad .我正在使用 Office 365 32 位和 Windows 10 64 位。

Answer 1

首先，正如 freeflow 已经提到的，回调应该是 RibbonOnLoad .其次，您应该使用 ActivateTab 方法，因为它是一个自定义选项卡。第三，您应该指定控件 ID，而不是选项卡名称。试试下面的代码，需要放在一个普通的模块中...

Private myRibbon As IRibbonUI

'Callback for customUI.onLoad
Sub RibbonOnLoad(ribbon As IRibbonUI)

    Set myRibbon = ribbon
    myRibbon.ActivateTab "MyCustomTab"

End Sub