Menüband automatisch einblenden bei Dokumentauffruf

VBA (Visual Basic for Application),
erlaubt über ein Makro "Sub AutoOpen()   ....  End", das Befehle beim Öffnen des Dokumentes automatisch ausgeführt werden.

 

Menüband (Ribbon) bei Word-Dokumenten,

kann, je nach Benutzereinstellungen, ausgeblendet sein.

Falls es notwendig ist, dass beim Öffnen des Dokuments das Menüband angezeigt wird, kann man dies durch folgenden VBA-Code in einem Makro "Sub AutoOpen.... End" erreichen.

 

 

Sub AutoOpen()

 

'Der Befehl "MinimizeRibbon" ist ein Wechselbefehl, der entweder das Menüband ausblendet oder, wenn es ausgeblendet ist, dieses einblendet. Ob das Menüband ausgeblendet ist, kann man über die "Height" herausfinden.

 

If (CommandBars("Ribbon").Controls(1).Height > 100) = 0 Then CommandBars.ExecuteMso "MinimizeRibbon"

End If

 

End Sub