Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
760to764
760to764
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ausblenden der bearbeitungsleiste und des namenfel

Forumthread: ausblenden der bearbeitungsleiste und des namenfel

ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 00:39:41
peter
hallo experten,
kann ich die bearbeitungsleiste und das namenfeld in excel auch ausblenden. die menüs und symbolleisten habe ich schon ausgeblendet. allerdings weiß ich nicht wie man diese beiden dinge noch wegbekommt.
vielleicht kann mit jemand helfen.
vielen dank im voraus!
lg peter
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 00:43:47
Rolf
Hi,
wirf den Makrorekorder an und blende die Bearbeitungsleiste aus, dann hast du den Code.
mfg Rolf
AW: ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 00:44:58
peter
ich weiß leider nicht wie ich sie ausblende!
bitte um hilfe!
AW: ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 00:47:17
Rolf
Hi,
kaum zu glauben bei Excel: gut?
Menü Ansicht, Bearbeitungsleiste...
mfg Rolf
Anzeige
AW: ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 06:25:32
rolf 

Sub Auto_open()
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.DisplayFormulaBar = False
Application.DisplayFullScreen = False
End Sub

AW: ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 09:02:09
klaus.h
Hallo hier
Option Explicit

Private Sub Workbook_Activate()
Dim x As Long
For x = 1 To Toolbars.Count
On Error Resume Next
If Toolbars(x).Visible Then
Leiste(x) = Toolbars(x).Name
Toolbars(x).Visible = False
End If
Next x
Application.DisplayFormulaBar = False
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Fenster").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Format").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Ansicht").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Daten").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Extras").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Bearbeiten").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Einfügen").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("?").Visible = False
'    Application.CommandBars("Formatting").Visible = True
End Sub



Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim x As Long
For x = 1 To 26
If Leiste(x) <> "" Then Toolbars(Leiste(x)).Visible = True
Next x
Application.DisplayFormulaBar = True
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Fenster").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Format").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Ansicht").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Daten").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Extras").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Bearbeiten").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Einfügen").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("?").Visible = True
End Sub



Private Sub Workbook_Deactivate()
Dim x As Long
For x = 1 To 26
If Leiste(x) <> "" Then Toolbars(Leiste(x)).Visible = True
Next x
Application.DisplayFormulaBar = True
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Fenster").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Format").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Ansicht").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Daten").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Extras").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Bearbeiten").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("Einfügen").Visible = True
Application.CommandBars("Worksheet Menu Bar").Controls("?").Visible = True
End Sub



Private Sub Workbook_Open()
Dim x As Long
For x = 1 To Toolbars.Count
On Error Resume Next
If Toolbars(x).Visible Then
Leiste(x) = Toolbars(x).Name
Toolbars(x).Visible = False
End If
Next x
Application.DisplayFormulaBar = False
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Fenster").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Format").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Ansicht").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Daten").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Extras").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Bearbeiten").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("Einfügen").Visible = False
Application.CommandBars("Worksheet Menu Bar").Controls("?").Visible = False
'    Application.CommandBars("Formatting").Visible = True
End Sub



Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
On Error Resume Next
Workbook_Open
End Sub

Anzeige
AW: ausblenden der bearbeitungsleiste und des namenfel
09.05.2006 09:29:44
peter
hallo klaus,
vielen dank für deine hilfe!
lg peter
;
Anzeige
Anzeige

Infobox / Tutorial

Bearbeitungsleiste und Namenfeld in Excel ausblenden

Schritt-für-Schritt-Anleitung

Um die Bearbeitungsleiste und das Namenfeld in Excel auszublenden, kannst Du die folgenden Schritte befolgen:

  1. Excel öffnen: Starte Microsoft Excel und öffne die Arbeitsmappe, in der Du die Bearbeitungsleiste und das Namenfeld ausblenden möchtest.

  2. Makro-Recorder aktivieren: Gehe zu Entwicklertools und aktiviere den Makro-Recorder.

  3. Bearbeitungsleiste ausblenden: Gehe zu Ansicht > Bearbeitungsleiste und deaktiviere die Option.

  4. Namenfeld ausblenden: Das Namenfeld wird oft über VBA ausgeblendet. Du kannst den folgenden Code verwenden:

    Sub BearbeitungsleisteUndNamenfeldAusblenden()
   Application.DisplayFormulaBar = False ' Bearbeitungsleiste ausblenden
End Sub

  5. Makro speichern: Beende den Makro-Recorder und speichere das Makro, um es jederzeit verwenden zu können.

Häufige Fehler und Lösungen

  • Fehler: Die Bearbeitungsleiste fehlt.

    • Lösung: Überprüfe, ob Du den richtigen VBA-Code verwendet hast. Stelle sicher, dass Application.DisplayFormulaBar auf False gesetzt ist.

  • Fehler: Die Bearbeitungsleiste ist verschwunden, lässt sich aber nicht wieder einblenden.

    • Lösung: Nutze die Tastenkombination Alt + V, gefolgt von F (für die Ansicht) und aktiviere die Bearbeitungsleiste erneut.

Alternative Methoden

Wenn Du die Bearbeitungsleiste und das Namenfeld nicht über VBA ausblenden möchtest, kannst Du auch die folgenden Methoden nutzen:

  • Menüoption: Gehe zu Ansicht und deaktiviere die Bearbeitungsleiste.
  • Benutzerdefinierte Ribbon-Anpassung: Du kannst das Ribbon anpassen, um die Sichtbarkeit der Bearbeitungsleiste direkt zu steuern.

Praktische Beispiele

Hier sind einige Beispiele, wie Du die Bearbeitungsleiste und das Namenfeld effektiv ausblenden kannst:

  1. VBA-Ansatz: Verwende den folgenden VBA-Code, um die Bearbeitungsleiste und das Namenfeld auszublenden, wenn die Arbeitsmappe geöffnet wird:

    Private Sub Workbook_Open()
   Application.DisplayFormulaBar = False ' Bearbeitungsleiste ausblenden
End Sub

  2. Makro zur Wiederherstellung: Um die Bearbeitungsleiste wieder einzublenden, kannst Du diesen Code verwenden:

    Sub BearbeitungsleisteEinblenden()
   Application.DisplayFormulaBar = True ' Bearbeitungsleiste einblenden
End Sub

Tipps für Profis

  • Dauerhaftes Ausblenden: Setze den VBA-Code in das Workbook_Open-Ereignis, um die Bearbeitungsleiste beim Öffnen der Arbeitsmappe dauerhaft auszublenden.
  • Tastenkombinationen: Nutze Alt + V, gefolgt von F für eine schnelle Steuerung der Sichtbarkeit der Bearbeitungsleiste.
  • Sichere Makros: Stelle sicher, dass Du Deine Makros sicher speicherst und eine Sicherungskopie der Arbeitsmappe anlegst, bevor Du Änderungen vornimmst.

FAQ: Häufige Fragen

1. Wie kann ich die Bearbeitungsleiste in Excel wieder einblenden?
Du kannst die Bearbeitungsleiste wieder einblenden, indem Du Alt + V drückst und dann F auswählst oder den entsprechenden VBA-Code ausführst.

2. Was kann ich tun, wenn die Bearbeitungsleiste immer wieder verschwindet?
Überprüfe Deine Makroeinstellungen und stelle sicher, dass der VBA-Code nicht ständig die Bearbeitungsleiste ausblendet.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige