Word 2016中的导航窗格：强制折叠标题视图的VBA代码

Question

我正在尝试使用VBA宏打开.docx文档时强制显示导航窗格，然后强制标题（任何级别）以折叠模式显示。 Collapse命令的代码是什么？

我记录宏时所拥有的只是

ActiveWindow.DocumentMap = True

右键单击标题并折叠不会记录代码行。这个活动有代码吗？

Answer 1

这可以很简单：

CommandBars.ExecuteMso "MinimizeRibbon"

注意：当功能区已隐藏时运行上面的功能会取消隐藏。