Clever-Excel-Forum

Liebe Freunde

Für eine etwas umfangreiche Tabelle blende ich den oberen Excel-Teil im Workbook.open - Teil aus. Bei Beendigung wieder ein.

Leider wird wenn ich zwischenzeitlich eine andere Mappe öffne, diese natürlich auch ohne den Ribbon/Toolbar-Teil angezeigt.
(Sofern ich meine Mappe nicht vorher schliesse und mit "BeforeClose"-Ereignis Excel wieder einblende.
Was am Anfang etwas gestört hat, ist mittlerweile mehr als ärgerlich...

Hat jemand einen Tipp, wie ich durch eine Art "Mappenwechsel-Ereignis " den Toolbar-Teil automatisch wieder einblenden kann?

Ich wäre froh um jeden Input - Danke schon im voraus!

Christian

Code:
Sub Symbolleiste_ausblenden()

    Application.ExecuteExcel4Macro "Show.Toolbar(""Ribbon"", False)"

    ActiveWindow.DisplayHeadings = False

    ActiveWindow.DisplayGridlines = False

    Application.DisplayFormulaBar = False

End Sub

Sub Symbolleiste_einblenden()

    Application.ExecuteExcel4Macro "Show.Toolbar(""Ribbon"", True)"

    ActiveWindow.DisplayHeadings = True

    ActiveWindow.DisplayGridlines = True

    Application.DisplayFormulaBar = True

End Sub

Hallo Christian,

da sollten doch diese beiden Funktionen hilfreich sein:

Code:

' In DieseArbeitsmappe
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
  Symbolleiste_ausblenden
End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
 Symbolleiste_einblenden
End Sub

_________
viele Grüße
Karl-Heinz

peacescorer

volti