Powerpoint VBA 最大化功能区

Powerpoint VBA to maximize the ribbon

有人知道用于最大化(显示选项卡和命令)和中等大小(仅显示选项卡)powerpoint 功能区的 Powerpoint VBA 语法吗?

以下可用于最小化色带,但我找不到任何东西可以将色带恢复到正常大小。

谢谢

' minimize the ribbon    
CommandBars.ExecuteMso "MinimizeRibbon"
    
' show tabs only on the ribbon?
xxx?
    
' maximize the ribbon (show tabs and commands)?
xxx?
    
     
CommandBars.ExecuteMso "MinimizeRibbon"

是一个开关,因此要最大化您只需再次 运行 即可。最小化时,选项卡仍会显示。要完全隐藏它们:

Sub HideRibbon()
    CommandBars.ExecuteMso "HideRibbon"
End Sub