Πώς να εισαγάγετε τον αριθμό σελίδας στο κελί / κεφαλίδα / υποσέλιδο στο Excel;
Όταν εκτυπώνετε ένα αρχείο Excel, ίσως χρειαστεί να εισαγάγετε τους αριθμούς σελίδων στις σελίδες για να κάνετε το εκτυπωμένο αρχείο τακτοποιημένο και ευανάγνωστο. Σε αυτό το άρθρο, θα παρουσιάσω μερικά γρήγορα κόλπα για να εισαγάγω τους αριθμούς σελίδων στο κελί, την κεφαλίδα ή το υποσέλιδο για εσάς.
Εισαγάγετε τον αριθμό σελίδας στην κεφαλίδα / το υποσέλιδο σε ένα φύλλο εργασίας
Εισαγάγετε τον αριθμό σελίδας στην κεφαλίδα / υποσέλιδο σε πολλά φύλλα εργασίας
Εισαγάγετε τον αριθμό σελίδας στο κελί με τον κωδικό VBA
Καταργήστε όλους τους αριθμούς σελίδων ταυτόχρονα στο Excel
Εισαγάγετε τον αριθμό σελίδας στην κεφαλίδα / το υποσέλιδο σε ένα φύλλο εργασίας
Κανονικά, μπορούμε να εισάγουμε τους αριθμούς σελίδων στην κεφαλίδα ή στο υποσέλιδο γρήγορα χρησιμοποιώντας το Επικεφαλίδα υποσέλιδο λειτουργία, κάντε τα εξής:
1. Μεταβείτε στο φύλλο εργασίας που θέλετε να εισαγάγετε τους αριθμούς σελίδων στην κεφαλίδα ή στο υποσέλιδο.
2. Στη συνέχεια κάντε κλικ στο κουμπί Κύριο θέμα > Επικεφαλίδα υποσέλιδοκαι το φύλλο εργασίας σας θα είναι Διάταξη σελίδας δείτε, δείτε το στιγμιότυπο οθόνης:
3. Κάντε κλικ στην κεφαλίδα ή στο υποσέλιδο όπου θέλετε να εισαγάγετε τον αριθμό σελίδας και στη συνέχεια a Υπηρεσίες καρτέλα με Εργαλεία κεφαλίδας και υποσέλιδου εμφανίζεται στην Κορδέλα και, στη συνέχεια, κάντε κλικ στο Υπηρεσίες > Αριθμός σελίδας, δείτε το στιγμιότυπο οθόνης:
4. Και μπορείτε να δείτε το σύμβολο κράτησης θέσης &[Σελίδα] εμφανίζονται στην επιλεγμένη ενότητα και, στη συνέχεια, κάντε κλικ οπουδήποτε έξω από την περιοχή κεφαλίδας ή υποσέλιδου για να εμφανίσετε τους αριθμούς σελίδας. Δείτε το στιγμιότυπο οθόνης:
5. Τώρα, μπορείτε να επαναφέρετε την κανονική προβολή κάνοντας κλικ Δες > Κανονικός, και όταν εκτυπώνετε αυτό το φύλλο εργασίας, θα δείτε ότι οι αριθμοί σελίδων έχουν εισαχθεί στην κεφαλίδα ή το υποσέλιδο που επιλέξατε.
Note: Εάν θέλετε οι αριθμοί σελίδων να εμφανίζονται ως μορφή 1 από 15, 2 από 15, απλά πρέπει να το εισαγάγετε απευθείας & [Σελίδα] από & [Σελίδες] στο πλαίσιο πεδίου κεφαλίδας ή υποσέλιδου, δείτε το στιγμιότυπο οθόνης:
Εισαγάγετε τον αριθμό σελίδας στην κεφαλίδα / υποσέλιδο σε πολλά φύλλα εργασίας
Η παραπάνω μέθοδος μπορεί να σας βοηθήσει να εισαγάγετε τους αριθμούς σελίδων σε ένα φύλλο εργασίας, εάν θέλετε να εισαγάγετε τους αριθμούς σελίδων σε όλα τα φύλλα εργασίας του βιβλίου εργασίας, ώστε όλες οι σελίδες να αριθμούνται με διαδοχική σειρά, κάντε το ως εξής:
1. Επιλέξτε όλες τις καρτέλες φύλλων και μετά πηγαίνετε στο Διάταξη σελίδας καρτέλα και κάντε κλικ στο κουμπί Κουμπί εκκίνησης πλαισίου διαλόγου εικονίδιο στο Εγκατάσταση σελίδας ομάδα, δείτε το στιγμιότυπο οθόνης:
2. Στην Εγκατάσταση σελίδας πλαίσιο διαλόγου, κάντε κλικ Επικεφαλίδα υποσέλιδο , και στη συνέχεια κάντε κλικ στο κουμπί OK Προσαρμοσμένη κεφαλίδα or Προσαρμοσμένο υποσέλιδο για να ρυθμίσετε την κεφαλίδα ή το υποσέλιδο που θέλετε, δείτε το στιγμιότυπο οθόνης:
3. Και στο επικεφαλίδα or Υποσέλιδο πλαίσιο διαλόγου, ορίστε την τοποθεσία όπου εισάγονται οι αριθμοί σελίδων κάνοντας κλικ μέσα στο Αριστερή ενότητα:, Κεντρική ενότητα:, ή Σωστό τμήμα: πλαίσιο όπως χρειάζεστε και, στη συνέχεια, κάντε κλικ στο Εισαγωγή αριθμού σελίδας εικονίδιο και το σύμβολο κράτησης θέσης &[Σελίδα] εμφανίζεται. Δείτε το στιγμιότυπο οθόνης:
Σημείωση: Εισάγετε αυτό & [Σελίδα] από & [Σελίδες] στο πλαίσιο πεδίου κεφαλίδας ή υποσέλιδου εάν θέλετε οι αριθμοί σελίδων που εμφανίζονται ως 1 από 45, 2 από 45…
4. Στη συνέχεια κάντε κλικ στο κουμπί OK > OK για να κλείσετε τα παράθυρα διαλόγου, όταν εκτυπώνετε αυτό το βιβλίο εργασίας, στην προεπισκόπηση εκτύπωσης, μπορείτε να δείτε ότι όλοι οι αριθμοί σελίδων εισάγονται στην κεφαλίδα ή το υποσέλιδο με διαδοχική σειρά.
Εισαγάγετε τον αριθμό σελίδας στο κελί με τον κωδικό VBA
Είναι εύκολο να εισαγάγετε τους αριθμούς σελίδων στην κεφαλίδα ή στο υποσέλιδο, αλλά, εάν πρέπει να εισαγάγετε τους αριθμούς σελίδων σε ένα κελί φύλλου εργασίας, δεν υπάρχει άμεσος τρόπος για να το κάνετε. Ο παρακάτω κώδικας VBA μπορεί να σας βοηθήσει να επιλύσετε αυτό το πρόβλημα.
1. Κάντε κλικ σε ένα κελί όπου θέλετε να εμφανιστεί ο αριθμός σελίδας αυτού του κελιού.
2. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.
3. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.
Κωδικός VBA: Εισαγάγετε τον τρέχοντα αριθμό σελίδας σε ένα κελί:
Sub pagenumber()
'updateby Extendoffice 20160506
Dim xVPC As Integer
Dim xHPC As Integer
Dim xVPB As VPageBreak
Dim xHPB As HPageBreak
Dim xNumPage As Integer
xHPC = 1
xVPC = 1
If ActiveSheet.PageSetup.Order = xlDownThenOver Then
xHPC = ActiveSheet.HPageBreaks.Count + 1
Else
xVPC = ActiveSheet.VPageBreaks.Count + 1
End If
xNumPage = 1
For Each xVPB In ActiveSheet.VPageBreaks
If xVPB.Location.Column > ActiveCell.Column Then Exit For
xNumPage = xNumPage + xHPC
Next
For Each xHPB In ActiveSheet.HPageBreaks
If xHPB.Location.Row > ActiveCell.Row Then Exit For
xNumPage = xNumPage + xVPC
Next
ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub
4. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κωδικό και ο αριθμός σελίδας αυτού του κελιού εμφανίζεται στο επιλεγμένο κελί, δείτε το στιγμιότυπο οθόνης:
Καταργήστε όλους τους αριθμούς σελίδων ταυτόχρονα στο Excel
Για να καταργήσετε όλους τους αριθμούς σελίδων, μπορείτε να εφαρμόσετε τα ακόλουθα βήματα:
1. Επιλέξτε όλες τις καρτέλες φύλλων και μεταβείτε στο Διάταξη σελίδας καρτέλα στην κορδέλα και μετά κάντε κλικ στο Κουμπί εκκίνησης πλαισίου διαλόγου εικονίδιο στο Εγκατάσταση σελίδας ομάδα, δείτε το στιγμιότυπο οθόνης:
2. Στην Εγκατάσταση σελίδας , κάντε κλικ στην επιλογή Επικεφαλίδα υποσέλιδο καρτέλα και μετά επιλέξτε (Κανένας) από το επικεφαλίδα or Υποσέλιδο αναπτυσσόμενη λίστα, δείτε το στιγμιότυπο οθόνης:
3. Στη συνέχεια κάντε κλικ στο κουμπί OK κουμπί, όλοι οι αριθμοί σελίδων αφαιρούνται ταυτόχρονα από το βιβλίο εργασίας.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
