Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Fixieren: Mehrere Tabellenblätter gleichzeitig

Forumthread: Fixieren: Mehrere Tabellenblätter gleichzeitig

Fixieren: Mehrere Tabellenblätter gleichzeitig
14.07.2003 14:09:32
Manfred
Hallo, wer kann mir ganz schnell helfen?
Habe eine xls-Datei mit ca. 50 Tabellenblättern. Muss nun in jedem Blatt eine Fensterfixierung durchführen. Bei 50 Blättern einzeln viel Arbeit. Gibt es einen Weg, alle Blätter in einem Arbeitsgang zu fixieren. Das Fixierungsfeld ist bei allen Blättern das selbe. Ergänzungsfrage, falls es eine Methode dafür gibt: Wie kann ich die Fixierung für alle Blätter in einem Arbeitsgang wieder aufheben?
Wenn jemand dafür einen praktischen und möglichst einfachen Weg kennt, freue ich mich auf eine kurze Mitteilung und danke schon jetzt dafür. Übrigens: habe keine Ahnung von VBA--Programmierung.
Gruss
Manfred
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Wie folgt
14.07.2003 14:38:58
Andreas Walter

Sub fixfen()
For i = 1 To Worksheets.Count
Worksheets(i).Select
Range("G4").Select
ActiveWindow.FreezePanes = True
Next i
End Sub



Anzeige
;
Anzeige

Infobox / Tutorial

Fensterfixierung in mehreren Excel-Tabellenblättern gleichzeitig


Schritt-für-Schritt-Anleitung

  1. Öffne Deine Excel-Datei mit den Tabellenblättern, die Du fixieren möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge ein neues Modul hinzu:

    • Klicke im Projekt-Explorer mit der rechten Maustaste auf den Namen Deiner Arbeitsmappe.
    • Wähle „Einfügen“ und dann „Modul“.
  4. Kopiere und füge den folgenden Code ein:

    Sub fixfen()
       For i = 1 To Worksheets.Count
           Worksheets(i).Select
           Range("G4").Select
           ActiveWindow.FreezePanes = True
       Next i
    End Sub
  5. Schließe den VBA-Editor und kehre zu Excel zurück.

  6. Führe das Makro aus:

    • Drücke ALT + F8, wähle „fixfen“ aus und klicke auf „Ausführen“.
  7. Um die Fixierung aufzuheben, kannst Du ein ähnliches Makro verwenden, indem Du ActiveWindow.FreezePanes = False einfügst.


Häufige Fehler und Lösungen

  • Fehler: Das Makro funktioniert nicht.

    • Lösung: Stelle sicher, dass Du die richtige Zelle (in diesem Fall G4) auswählst, bevor Du die Fensterfixierung anwendest.
  • Fehler: Einige Blätter werden nicht fixiert.

    • Lösung: Überprüfe, ob alle Blätter den gleichen Fixierungsbereich haben. Andernfalls musst Du den Code anpassen.

Alternative Methoden

Wenn Du keine VBA-Programmierung verwenden möchtest, kannst Du die Fixierung manuell für jedes Blatt durchführen. Das ist jedoch zeitaufwändiger, besonders bei vielen Tabellenblättern:

  1. Wähle das erste Tabellenblatt aus.
  2. Gehe zu „Ansicht“ und klicke auf „Fenster fixieren“.
  3. Wähle den Bereich aus, den Du fixieren möchtest.
  4. Wiederhole diesen Vorgang für jedes Blatt.

Praktische Beispiele

Nehmen wir an, Du hast eine Arbeitsmappe mit 50 Blättern, und Du möchtest die Zelle G4 in jedem Blatt fixieren. Mit dem oben genannten VBA-Skript kannst Du die Fixierung ganz einfach in einem Durchgang durchführen.

Für das Aufheben der Fixierung kannst Du den folgenden Code verwenden:

Sub unfixfen()
    For i = 1 To Worksheets.Count
        Worksheets(i).Select
        ActiveWindow.FreezePanes = False
    Next i
End Sub

Tipps für Profis

  • Makros speichern: Stelle sicher, dass Du Deine Excel-Datei im .xlsm-Format speicherst, um die Makros zu behalten.
  • Sicherheitswarnungen: Aktiviere Makros in den Excel-Optionen, um sicherzustellen, dass Deine Skripte laufen.
  • Testen: Teste das Makro zuerst in einer Kopie Deiner Datei, um unerwünschte Änderungen zu vermeiden.

FAQ: Häufige Fragen

1. Kann ich die Fensterfixierung rückgängig machen?
Ja, mit dem oben genannten Makro für das Aufheben der Fixierung kannst Du die Fensterfixierung für alle Blätter gleichzeitig aufheben.

2. Was passiert, wenn ich verschiedene Fixierungsbereiche habe?
In diesem Fall musst Du den VBA-Code anpassen, um verschiedene Bereiche anzusprechen, da die Fixierung in jedem Blatt individuell sein kann.

Beliebteste Forumthreads (12 Monate)

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