Alle Symbolleisten per Makro ausblenden

18. März 2009
Martin Althaus Von Martin Althaus, Excel, Office ...

So schalten Sie alle Symbolleisten aus

Sie möchten alle Symbolleisten in einem Zug per Makro ausblenden? Das können Sie über ein Klick mit der rechten Maustaste auf eine Symbolleiste und anschließendes Abwählen aller Symbolleisten erledigen oder indem Sie die Funktion "Extras – Anpassen" einsetzen.

Aber wie machen Sie das per Makro? Das folgende Makro blendet alle Symbolleisten aus, die aktuell angezeigt werden:

Sub SymbolleistenAusblenden()
Dim i As Integer
For i = 0 To CommandBars.Count - 1
If CommandBars(CommandBars.Count - i).Visible And _
CommandBars(CommandBars.Count - i).Type <> msoBarTypeMenuBar Then
CommandBars(CommandBars.Count - i).Visible = False
End If
Next i
End Sub

Nach dem Start des Makro wird Excel komplett ohne Symbolleisten angezeigt. Die folgende Abbildung zeigt, wie das aussehen kann:

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"