关闭Excel时如何显示选项卡和功能区？

Question

我有一个宏，当打开该excel文件时，该宏会自动隐藏功能区，但是，当我关闭文件时，我希望它们重新出现，因此在使用其他文件时，这意味着我不必每次都设置格式。

我为excel打开/关闭时编写了以下代码。但是，如果不手动单击，将无法重新显示功能区。

Private Sub Workbook_Open()

Application.CommandBars.ExecuteMso "HideRibbon"
ActiveWindow.DisplayGridlines = False

ActiveWindow.DisplayHeadings = False

Application.DisplayFormulaBar = False

Application.DisplayFullScreen = True
End Sub


Sub Auto_close()
Application.CommandBars.ExecuteMso "hideRibbon"
Application.CommandBars.ExecuteMso "hideRibbon"

ActiveWindow.DisplayGridlines = True

ActiveWindow.DisplayHeadings = True

Application.DisplayFormulaBar = True
End Sub

Answer 1

这将显示功能区：

Application.ExecuteExcel4Macro "show.toolbar(""Ribbon"", True)"

这会隐藏功能区：

Application.ExecuteExcel4Macro "show.toolbar(""Ribbon"", False)"

Answer 2

尝试

Private Sub Workbook_Open()
ActiveWindow.DisplayGridlines = False
ActiveWindow.DisplayHeadings = False
Application.DisplayFormulaBar = False
Application.DisplayFullScreen = True
End Sub

Sub test()
Application.DisplayFullScreen = False
ActiveWindow.DisplayGridlines = True
ActiveWindow.DisplayHeadings = True
Application.DisplayFormulaBar = True
Application.CommandBars("Standard").Visible = True
End Sub