移除功能区，但使用 VBA 将 QAT 保留在 Access 中答案

【问题标题】：Remove ribbon but keep QAT in Access using VBA移除功能区，但使用 VBA 将 QAT 保留在 Access 中
【发布时间】：2017-02-23 20:13:10
【问题描述】：

我已经使用这行代码在启动时成功移除了功能区：

DoCmd.ShowToolbar "Ribbon", acToolbarNo

但这也会删除快速访问工具栏。我希望保留它，以便用户只能看到我选择显示的图标（复制、粘贴、导出到 Excel 等）。

我的最终目标是只显示这些图标，而标题则为空、细且不碍事。我正在尝试尽可能多地节省屏幕空间，并且我不希望用户必须能够扩展功能区。

是否有类似的代码行会强制显示 QAT。此外，有没有办法选择哪些快捷方式将出现在带有 VBA 的 QAT 中。我知道这可以手动完成，但我正在尝试自动化它。

【问题讨论】：

标签： ms-access vba

【解决方案1】：

看起来可以使用自定义 Access XML

首先阅读并阅读此内容 https://support.office.com/en-us/article/Customize-the-Ribbon-45e110b9-531c-46ed-ab3a-4e25bc9413de

然后您需要创建自己的 XML 代码来控制一切

这里是要使用的控件idMso列表http://www.ribboncreator2010.de/Onlinehelp/EN/_2el0osmon.htm

以下是我拼凑起来的一个概念证明

<?xml version="1.0" encoding="UTF-8"?>  
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">  
  <ribbon startFromScratch="true">  
    <tabs>  
      <tab idMso="TabAddIns">   
      </tab>  
    </tabs>
    <qat>
        <documentControls>
            <control idMso="SaveObjectAs" />
        </documentControls>
    </qat>
  </ribbon>  
</customUI>

这就是它的样子

【讨论】：