Excel VBA使用SendKeys最小化功能区

如解决方案中所述，我创建了以下VBA以最小化Excel中的功能区菜单：

Sub Minimize_Ribbon()
SendKeys "^{F1}"
End Sub

但是，当我运行此VBA时，它会打开以下链接，指向Microsoft的“帮助”部分：

我认为这个问题是因为应该运行Ctrl的

^

的某些人在VBA中不工作

---

我需要更改什么才能使其正常工作？

如评论中所述，解决方案是：

Sub Minimize_Ribbon()
CommandBars.ExecuteMso "MinimizeRibbon"
End Sub

---

commandbar.ExecuteMso“MinimizeRibbon”

或

commandbar.ExecuteMso“hideribon”

如果您想完全隐藏它。实际上

SendKeys

总是最糟糕的解决方案（如果有其他选项）。使用

Application.ExecuteExcel4Macro“SHOW.TOOLBAR”（“Ribbon”和“False）”

可以真正隐藏工具栏；-）