Excel 隐藏工具栏不工作的过程中的布尔参数

我编写了下面的过程来隐藏工具栏。当设置为FALSE时，所有其他选项都有效，但下面的粗线无效。即使设置为FALSE，工具栏仍会显示

Sub engageDashboard(state As Boolean)

   Application.ScreenUpdating = state

   **Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", state)"**
   Application.DisplayFormulaBar = state

   ActiveWindow.DisplayWorkbookTabs = state
   ActiveWindow.DisplayHeadings = state
   ActiveWindow.DisplayGridlines = state

End Sub

有什么想法吗

---

如果这正是您要执行的命令，请向您表示感谢：

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", state)"

然后，

状态

变量不会传递到字符串中。在这种情况下，您需要使用以下各项：

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", " & state & ")"

这将使用当前值

state

，并将其正确连接到调用中