询问Microsoft Access 2016新增帮助选项卡的idMso值

嘿，我之前也碰到过这个一模一样的问题！那个在Access 2016里突然冒出来的帮助选项卡，它的idMso就是TabHelp。

我当时也纳闷，官方的Office Fluent用户界面下载包自从2016年1月之后就没更新过，完全找不到这个新选项卡的信息，折腾了好一阵才试出来这个id。

你只需要把这个idMso加到自定义功能区XML的隐藏配置里就行，举个简单的示例：

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
  <ribbon startFromScratch="false">
    <tabs>
      <!-- 隐藏新增的帮助选项卡 -->
      <tab idMso="TabHelp" visible="false"/>
      <!-- 这里放你的自定义选项卡配置 -->
      <tab id="MyCustomTab" label="我的自定义选项卡">
        <!-- 自定义组和控件 -->
      </tab>
    </tabs>
  </ribbon>
</customUI>

如果想自己验证所有可用的idMso，也可以用一段VBA代码导出当前Access的所有功能区控件ID，这样以后碰到类似的新控件也能自己找：

Sub ExportAllRibbonIDs()
    Dim ribbonBar As CommandBar
    Dim ribbonCtrl As CommandBarControl
    Dim fileSystem As Object
    Dim textFile As Object
    
    ' 创建文件系统对象，输出到临时目录
    Set fileSystem = CreateObject("Scripting.FileSystemObject")
    Set textFile = fileSystem.CreateTextFile(Environ("TEMP") & "\AccessRibbonIDs.txt", True)
    
    ' 遍历所有功能区选项卡
    For Each ribbonBar In Application.CommandBars
        If ribbonBar.Type = msoBarTypeRibbon Then
            textFile.WriteLine "=== 选项卡: " & ribbonBar.Name & " (idMso: " & ribbonBar.ID & " ==="
            For Each ribbonCtrl In ribbonBar.Controls
                textFile.WriteLine "  控件: " & ribbonCtrl.Caption & " (idMso: " & ribbonCtrl.ID & ")"
            Next ribbonCtrl
        End If
    Next ribbonBar
    
    ' 清理对象并提示
    textFile.Close
    Set textFile = Nothing
    Set fileSystem = Nothing
    MsgBox "所有功能区ID已导出到: " & Environ("TEMP") & "\AccessRibbonIDs.txt"
End Sub

运行这段代码后，打开生成的文本文件就能找到TabHelp的条目，确认它的正确性。

内容的提问来源于stack exchange，提问作者Kristofor C