Question

我正在寻找一种隐藏Access 2016应用程序功能区上标准Home选项卡的方法。我想从VBA做到这一点。隐藏完整的色带不是一种选择。我试图使用commandbars-collection做到这一点，但没有任何积极的结果。

Answer 1

考虑使用Application.LoadCustomUI方法，但该过程与初始设置有点牵连。以下是创建新自定义标签时的说明和相同步骤：

创建或加载自定义UI xml（格式正确的xml文档），然后将其作为字符串传递给方法，为功能区指定名称，例如 HideHome ：

Public Function CustomRibbon()
    Dim customerXML As String

    customXML = "<customUI xmlns=""http://schemas.microsoft.com/office" _
                & "/2009/07/customui"">" _
                & "  <ribbon startFromScratch=""false"">" _
                & "    <tabs>" _
                & "      <tab idMso=""TabHomeAccess"" visible=""false"" />" _
                & "    </tabs>" _
                & "  </ribbon>" _
                & "</customUI>"

    Application.LoadCustomUI "HideHome", customXML
End Function

在打开表格的OnOpen或OnLoad触发事件或名为 AutoExec 的宏中调用此函数或子例程。此步骤很重要，因为一旦看到它就无法重新加载或更改功能区，否则会出现错误，因此请确保它是开放自动化的一部分。
第一次打开数据库时，不会发生任何事情，因为您必须先在选项下选择创建的功能区。在首先打开数据库并执行上述前两个步骤后，在文件/选项/当前数据库下，向下滚动到功能区和选项卡选项，选择新的功能区名称（在步骤＃1中创建和命名的名称）在下拉字段中。
关闭并重新打开数据库，功能区上不再显示“主页”选项卡。在更改相同的命名功能区时，可以跳过3。

**我知道上述步骤适用于MS Access 2007-2013，希望在2016年或多或少相同。

如何通过VBA隐藏Access 2016 Home功能区选项卡？

1 个答案: