Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie man Einfrieren / Aufheben der Fenster auf mehrere Arbeitsblätter gleichzeitig anwenden?

Angenommen, Sie haben eine große Arbeitsmappe, die Hunderte von Arbeitsblättern enthält, und jetzt müssen Sie die Freeze Panes anwenden, um alle Arbeitsblätter auf einmal einzufrieren. Mit der Freeze Panes-Funktion von Excel können Sie einfach nur ein Arbeitsblatt auf einmal fixieren. Gibt es eine Möglichkeit, alle Arbeitsblätter sofort in Excel zu fixieren oder aufzusparen?

Wenden Sie Freeze Panes auf alle Arbeitsblätter gleichzeitig mit VBA-Code an

Übernehmen Sie das Aufheben der Fixierung von Bereichen auf alle Arbeitsblätter gleichzeitig mit VBA-Code

Mit Kutools for Excel können Sie alle Arbeitsblätter gleichzeitig mit einem Klick auf "Einfrieren / Aufheben" aufheben


Anwenden von Freeze / Unfreeze-Bereichen auf mehrere Arbeitsblätter:

Kutools für Excel 's Freeze / Unfreeze fügt mehrere Arbeitsblätter ein kann Ihnen helfen, alle Arbeitsblätter in Ihrer Arbeitsmappe mit einem Klick einzufrieren oder aufzutauen.

doc mehrere Blätter 1 einfrieren

Kutools for Excel: mit mehr als 200 praktischen Excel-Add-Ins, die Sie in 60-Tagen kostenlos ausprobieren können. Download und kostenlose Testversion Jetzt!



Sie können den folgenden Code verwenden, um die Freeze-Bereiche auf alle Arbeitsblätter anzuwenden. Führen Sie dazu die folgenden Schritte aus:

1. Wenn Sie alle Arbeitsblätter an derselben Position einfrieren möchten, wählen Sie im Arbeitsblatt eine Zelle aus, die Sie fixieren möchten, und halten Sie sie gedrückt Verschiebung Taste, um alle Blattregister auszuwählen.

2. Halten Sie die Taste gedrückt ALT + F11 Schlüssel, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.

3. Klicken Sie Einsatz > Modul, und fügen Sie den folgenden Code in die Modulfenster.

VBA-Code: Fixieren Sie alle Arbeitsblätter in Excel gleichzeitig

Sub Freeze()
'Update 20140317
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = True
    End With
Next
Application.ScreenUpdating = True
End Sub

4. Und dann drücken F5 Schlüssel, um diesen Code auszuführen, und alle Arbeitsblätter wurden mit den Freeze-Bereichen in der gleichen Position angewendet.

Hinweis: Wenn nicht alle Arbeitsblätter ausgewählt sind und sich die aktiven Zellen jedes Arbeitsblatts an unterschiedlichen Positionen befinden, werden die Einfrierbereiche an den verschiedenen Stellen als aktive Zellen aktiviert.


Wenn mehrere Arbeitsblätter mit den Einfrierbereichen in Ihrem Excel angewendet werden, wie können Sie sie auf einmal aufheben, außer sie einzeln aufzutauen?

1. Starten Sie Ihre Arbeitsmappe, welche Arbeitsblätter mit den Freeze-Bereichen angewendet wurden.

2. Halten Sie die Taste gedrückt ALT + F11 Schlüssel, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.

3. Klicken Sie Einsatz > Modul, und fügen Sie den folgenden Code in die Modulfenster.

VBA-Code: Entsperren Sie alle Arbeitsblätter auf einmal in Excel

Sub UnFreeze()
'Update 20140317
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = False
    End With
Next
Application.ScreenUpdating = True
End Sub

4. Und dann drücken F5 Schlüssel, um diesen Code auszuführen, und alle Arbeitsblätter, die mit den Freeze-Bereichen angewendet wurden, wurden sofort entsperrt.


Wenn Sie nicht mit den VBA-Codes vertraut sind, hier ist ein leistungsfähiges Werkzeug Kutools for Excel, seine Einfrieren verschiebt mehrere Arbeitsblätter und Aufheben der Fixierung mehrerer Arbeitsblätter Mithilfe von Dienstprogrammen können Sie alle Arbeitsblätter der aktuellen Arbeitsmappe gleichzeitig einfrieren oder aufheben.

Kutools for Excel : mit mehr als 300 praktischen Excel-Add-Ins, die Sie in 60-Tagen kostenlos ausprobieren können.

Wenn Sie installiert haben Kutools für Excel, mach bitte wie folgt:

1. Wählen Sie eine Zelle aus, in der Sie den Einfrierbereich für alle Arbeitsblätter anwenden möchten. In diesem Fall klicke ich auf Zelle B2, siehe Screenshot:

doc alle Blätter einfrieren 1-1

2. Dann klick Unternehmen > Arbeitsblatt > Freeze fügt mehrere Arbeitsblätter ein, siehe Screenshot:

doc alle Blätter einfrieren 2-2

3. Und dann wurden alle Ihre Arbeitsblätter auf der gleichen Position der Zelle B2 die Freeze-Bereiche angewendet.

Text: Wenn Sie sie sofort freigeben möchten, müssen Sie nur die Funktion zum Aufheben der Freigabe mehrerer Arbeitsblätter anwenden, indem Sie auf klicken Unternehmen > Arbeitsblatt > Aufheben der Fixierung mehrerer Arbeitsblätter.

Download und kostenlose Testversion Kutools für Excel Now!


Kutools for Excel: mit mehr als 200 praktischen Excel-Add-Ins, die Sie in 60-Tagen kostenlos ausprobieren können. Download und kostenlose Testversion Jetzt!


In Verbindung stehender Artikel:

Wie einfriert Scheiben in Excel?


Kutools for Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einlegen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (Bearbeiten Sie mühelos mehrere Textzeilen und Formeln); Layout lesen (Leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt der Zellen teilen; Kombinieren Sie doppelte Zeilen / Spalten... Doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie "Duplizieren" oder "Eindeutig" Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufallsauswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen auf mehrere Blätter; Bullets einfügen, Kontrollkästchen und mehr ...
  • Extract Text, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen; Erstellen und Drucken von Paging-Zwischensummen; Zwischen Zelleninhalt und Kommentaren konvertieren...
  • Superfilter (Speichere und wende Filterschemata auf andere Blätter an); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Arbeitsmappen und Arbeitsblätter kombinieren; Zusammenführen von Tabellen basierend auf Schlüsselspalten; Daten in mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Kostenlose 30-Testversion für alle Funktionen.
Registerkarte Tab 201905

Registerkarte "Office" Bringt die Benutzeroberfläche mit Registerkarten in Office und vereinfacht Ihre Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50% und reduziert täglich Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    JD · 3 years ago
    want to be able to freeze top row on multiple worksheets
  • To post as a guest, your comment is unpublished.
    Kurt · 4 years ago
    I tried this in my workbook and it worked very well.

    thanks
  • To post as a guest, your comment is unpublished.
    Orchid · 5 years ago
    dear all,
    I have a test in my workbook, have a good note that before you apply this macro, please move the mouse to the cell that you need to apply freeze pane in the sheet.
    it's really helpful. this info is what I am looking for.
    thank you very much
    Lan