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

Question

我已经使用下面这行代码成功地删除了启动时的ribbon：

DoCmd.ShowToolbar "Ribbon", acToolbarNo

但这也会删除快速访问工具栏。我想让它保持不变，这样用户就只能看到我选择要显示的图标(复制、粘贴、导出到Excel等)。

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

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

Answer 1

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

从通读这个https://support.office.com/en-us/article/Customize-the-Ribbon-45e110b9-531c-46ed-ab3a-4e25bc9413de开始

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

下面是使用http://www.ribboncreator2010.de/Onlinehelp/EN/_2el0osmon.htm的控件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>

这就是看起来的样子

​

​