Πώς να εκτυπώσετε επανειλημμένα τίτλους σε πολλά φύλλα;

Η εκτύπωση της σειράς κεφαλίδας στην κορυφή επανειλημμένα σε κάθε σελίδα χρησιμοποιείται συνήθως στη δουλειά μας, αλλά έχετε προσπαθήσει ποτέ να εκτυπώσετε σειρές τίτλων επανειλημμένα σε πολλά φύλλα; Σε αυτό το άρθρο, έχω δύο εύκολους τρόπους να χειριστώ αυτήν την ερώτηση στο Excel.

Εκτυπώστε επανειλημμένα τίτλους σε πολλά φύλλα εργασίας με VBA

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

Εκτυπώστε επανειλημμένα τίτλους σε πολλά φύλλα εργασίας με VBA

Δεν υπάρχει ενσωματωμένη δυνατότητα για εκτύπωση επανειλημμένων τίτλων σε πολλά φύλλα, αλλά μπορείτε να χρησιμοποιήσετε μια μακροεντολή για να το χειριστείτε.

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

2. Στο Εγκατάσταση σελίδας κάντε κλικ στο πλαίσιο διαλόγου Φύλλο καρτέλα, επιλέξτε τη γραμμή τίτλου από την οποία θέλετε να εκτυπώσετε επανειλημμένα Γραμμές να επαναλαμβάνονται στην κορυφή, και κάντε κλικ στο κουμπί OK. Δείτε το στιγμιότυπο οθόνης:

3. Τύπος Alt + F11 πλήκτρα για να ενεργοποιήσετε το Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης για να δημιουργήσετε ένα νέο Μονάδα μέτρησης.

4. Στη συνέχεια επικολλήστε τον παρακάτω κώδικα στο κενό σενάριο και πατήστε F5 για να εκτελέσετε τον κωδικό.

VBA: Εκτυπώστε επανειλημμένα τίτλους σε πολλά φύλλα

Sub SetAttributes()
'UpdatebyExtendoffice20170810
    Dim xSheet As Worksheet
    Dim xSheetOne As Worksheet
    Dim xSheets As Sheets
    Set xSheets = ActiveWorkbook.Worksheets
    Set xSheetOne = xSheets(1)
    For Each xSheet In xSheets
        xSheet.PageSetup.PrintTitleRows = xSheetOne.PageSetup.PrintTitleRows
    Next xSheet
End 

Μετά την εφαρμογή του VBA, η επάνω γραμμή σε κάθε φύλλο θα επαναληφθεί στο πάνω μέρος του αντίστοιχου φύλλου κατά την εκτύπωση.

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

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

Μετά την εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:（Δωρεάν λήψη Kutools για Excel τώρα!)

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

2. Στο Εγκατάσταση σελίδας κάντε κλικ στο πλαίσιο διαλόγου Φύλλο και επιλέξτε τους τίτλους από τους οποίους θέλετε να εκτυπώσετε επανειλημμένα Γραμμές να επαναλαμβάνονται στην κορυφή. Δείτε το στιγμιότυπο οθόνης:

3. κλικ OK, στη συνέχεια κάντε κλικ στο κουμπί Kutools Plus > Εκτύπωση > Αντιγραφή ρύθμισης σελίδας. Δείτε το στιγμιότυπο οθόνης:

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

5. κλικ Ok. Τώρα οι κορυφαίες σειρές έχουν επαναληφθεί στην κορυφή σε πολλά φύλλα κατά την εκτύπωση.

  Διαδήλωση