Ribbon maximieren und minimieren per VBA
08.04.2015 15:34:51
SteffenS
ich möchte gern per VBA das Menüband ein- und ausblenden. Beim ausblenden sollen dabei aber die Tabs dennoch angezeigt werden. Es sollen nur die Buttons nicht sichtbar sein.
Im Netz habe ich dazu schon folgendes gefunden
Sub Ribbon_aus1()
If (CommandBars("Ribbon").Controls(1).Height Das Problem ist nur das es kein Maximized gib. Habt Ihr eine Idee.
Die anderen Lösung sind nicht wirklich gut und würde ich eher nicht verwenden wollen:
Sub RibbonAufZu()
Rem Ribbon einklappen oder ausklappen
SendKeys "^{F1}"
End Sub
Sub RibbonAusblenden()
Rem Blendet das Ribbon aus
Application.ExecuteExcel4Macro "Show.Toolbar(""Ribbon"", False)"
End Sub
Sub RibbonEinblenden()
Rem Blendet das Ribbon ein
Application.ExecuteExcel4Macro "Show.Toolbar(""Ribbon"", True)"
End Sub
VG SteffenS