使用 VBA 切换 Excel 功能区答案

【问题标题】：Excel ribbon toggle using VBA使用 VBA 切换 Excel 功能区
【发布时间】：2019-03-21 11:21:38
【问题描述】：

我想在 Excel 打开时切换 Excel 功能区。例如，当 Excel 打开时，它总是显示“开始”功能区，但我想使用 VBA 设置另一个“DeveloperTab”。

如何获取 excel 功能区的 idMso？

【问题讨论】：

查看this discussion 看看它是否对您的情况有所帮助

【解决方案1】：

我可以通过一个类和一些 XML 来做到这一点。这是GitHub 中的示例文件。如果将.xlam 文件复制到%AppData%\Microsoft\Excel\XLSTART\ 目录，则每次Excel 打开“开发人员”选项卡都会获得焦点。要在 Excel 中创建/编辑 XML 功能区，请使用 Custom UI Editor Tool。

示例视频

功能区类

Option Explicit

Public Sub Ribbon_Load(ribbonUI As IRibbonUI)
On Error GoTo ErrTrap

    ribbonUI.ActivateTabMso ("TabDeveloper")

ExitProcedure:
    On Error Resume Next
    Exit Sub

ErrTrap:
    Select Case Err.Number
        Case Else
            Debug.Print "Error #: " & Err.Number & " |Error Description: " & Err.Description
    End Select
    Resume ExitProcedure
    Resume 'for debugging

End Sub

XML 代码

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="Ribbon_Load">
    <ribbon>
    </ribbon>
</customUI>

【讨论】：