Πώς να εφαρμόσετε τα παράθυρα παγώματος / κατάψυξης σε πολλά φύλλα εργασίας ταυτόχρονα;

Ας υποθέσουμε ότι έχετε ένα μεγάλο βιβλίο εργασίας που περιέχει εκατοντάδες φύλλα εργασίας και τώρα πρέπει να εφαρμόσετε τα Πάγια παγώματος για να παγώσετε όλα τα φύλλα εργασίας ταυτόχρονα. Με τη λειτουργία Freeze Panes του Excel, μπορείτε να παγώσετε μόνο ένα φύλλο εργασίας κάθε φορά, υπάρχει τρόπος να παγώσετε ή να παγώσετε όλα τα φύλλα εργασίας αμέσως στο Excel;

Εφαρμόστε τα Freeze Panes σε όλα τα φύλλα εργασίας ταυτόχρονα με τον κώδικα VBA

Εφαρμόστε Unfreeze Panes σε όλα τα φύλλα εργασίας ταυτόχρονα με τον κώδικα VBA

Εφαρμόστε τα παράθυρα παγώματος / απελευθέρωσης σε όλα τα φύλλα εργασίας ταυτόχρονα με ένα κλικ με το Kutools για Excel

Εφαρμόστε τα Freeze Panes σε όλα τα φύλλα εργασίας ταυτόχρονα με τον κώδικα VBA

Μπορείτε να χρησιμοποιήσετε τον ακόλουθο κώδικα για να εφαρμόσετε τα παγωμένα παράθυρα σε όλα τα φύλλα εργασίας, ακολουθήστε τα παρακάτω βήματα:

1. Εάν θέλετε να παγώσετε όλα τα φύλλα εργασίας στην ίδια θέση, επιλέξτε ένα κελί που θέλετε να παγώσετε στο φύλλο εργασίας και, στη συνέχεια, κρατήστε πατημένο αλλαγή για να επιλέξετε όλες τις καρτέλες φύλλων.

2. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Παράθυρο Microsoft Visual Basic for Applications.

3. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.

Κωδικός VBA: Πάγωμα όλων των φύλλων εργασίας ταυτόχρονα στο Excel

Sub Freeze()
'Updateby Extendoffice
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. Και στη συνέχεια πατήστε F5 κλειδί για την εκτέλεση αυτού του κώδικα και όλα τα φύλλα εργασίας έχουν εφαρμοστεί με τα παγωμένα παράθυρα στην ίδια θέση.

Σημείωση: Εάν δεν έχουν επιλεγεί όλα τα φύλλα εργασίας και τα ενεργά κελιά κάθε φύλλου εργασίας βρίσκονται σε διαφορετικές θέσεις, τα παγωμένα παράθυρα θα βρίσκονται σε διαφορετικά μέρη ως ενεργά κελιά.

Εφαρμόστε Unfreeze Panes σε όλα τα φύλλα εργασίας ταυτόχρονα με τον κώδικα VBA

Εάν υπάρχουν πολλά φύλλα εργασίας που εφαρμόζονται με τα παράθυρα παγώματος στο Excel, πώς θα μπορούσατε να τα ξεπαγώσετε τη φορά εκτός από το να τα ξεπαγώσετε ένα προς ένα;

1. Ξεκινήστε το βιβλίο εργασίας σας, τα φύλλα εργασίας που έχουν εφαρμοστεί με τα παράθυρα παγώματος.

2. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Παράθυρο Microsoft Visual Basic for Applications.

3. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.

Κωδικός VBA: Κατάργηση πάγωσης όλων των φύλλων εργασίας ταυτόχρονα στο Excel

Sub UnFreeze()
'Updateby Extendoffice
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. Και στη συνέχεια πατήστε F5 κλειδί για την εκτέλεση αυτού του κώδικα και όλα τα φύλλα εργασίας που εφαρμόστηκαν με τα παγωμένα παράθυρα έχουν ξεπαγώσει ταυτόχρονα.

Εφαρμόστε τα παράθυρα παγώματος / απελευθέρωσης σε όλα τα φύλλα εργασίας ταυτόχρονα με ένα κλικ με το Kutools για Excel

Εάν δεν είστε εξοικειωμένοι με τους κωδικούς VBA, εδώ είναι ένα ισχυρό εργαλείο- Kutools για Excel, της Πάγωμα παραθύρων πολλαπλών φύλλων εργασίας και Καταργήστε την κατάψυξη πολλών φύλλων εργασίας Τα βοηθητικά προγράμματα μπορούν να σας βοηθήσουν να παγώσετε ή να παγώσετε όλα τα φύλλα εργασίας του τρέχοντος βιβλίου εργασίας ταυτόχρονα.

Μετά την εγκατάσταση Kutools για Excel, κάντε το ως εξής:

1. Επιλέξτε ένα κελί όπου θέλετε να εφαρμόσετε το παράθυρο παγώματος για όλα τα φύλλα εργασίας, σε αυτήν την περίπτωση, κάνω κλικ στο κελί B2, δείτε το στιγμιότυπο οθόνης:

2. Στη συνέχεια κάντε κλικ στο κουμπί Kutools Plus > Φύλλο εργασίας > Πάγωμα παραθύρων πολλαπλών φύλλων εργασίας, δείτε το στιγμιότυπο οθόνης:

3. Και τότε όλα τα φύλλα εργασίας σας έχουν εφαρμοστεί τα παγωμένα παράθυρα στην ίδια θέση του κελιού B2.

Σημείωση: Εάν θέλετε να τα ξεπαγώσετε αμέσως, απλώς πρέπει να εφαρμόσετε τη δυνατότητα πολλαπλών φύλλων εργασίας Unfreeze στα παράθυρα κάνοντας κλικ Kutools Plus> Φύλλο εργασίας > Καταργήστε την κατάψυξη πολλών φύλλων εργασίας.

Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!

Επίδειξη: Εφαρμόστε τα παράθυρα παγώματος / κατάψυξης σε όλα τα φύλλα εργασίας ταυτόχρονα με ένα κλικ με το Kutools για Excel