Ms access 移除功能区，但使用VBA将QAT保持在可访问状态

我已使用以下代码行在启动时成功删除功能区：

DoCmd.ShowToolbar "Ribbon", acToolbarNo

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

我的最终目标是只显示这些图标，而标题则是空的、薄的、不碍事的。我正在努力节省尽可能多的屏幕空间，我不希望用户有能力扩展RIBON

---

是否有类似的代码行强制显示QAT。此外，是否有一种方法可以选择使用VBA在QAT中显示哪些快捷方式。我知道这可以手动完成，但我正在尝试将其自动化。

似乎可以使用自定义访问XML

从阅读这篇文章开始

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

下面是要使用的控件idMso的列表

下面是一个我临时拼凑起来作为概念证明的东西

<?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>

这就是它的样子