Wie füge ich die Seitenzahl in Excel in Zelle / Kopf- / Fußzeile ein?
Wenn Sie eine Excel-Datei drucken, müssen Sie möglicherweise die Seitenzahlen in die Seiten einfügen, damit die gedruckte Datei sauber und lesbar ist. In diesem Artikel werde ich einige schnelle Tricks vorstellen, um die Seitenzahlen für Sie in Zelle, Kopf- oder Fußzeile einzufügen.
Fügen Sie die Seitenzahl in die Kopf- / Fußzeile eines Arbeitsblatts ein
Fügen Sie die Seitenzahl über mehrere Arbeitsblätter in die Kopf- / Fußzeile ein
Fügen Sie die Seitenzahl mit dem VBA-Code in die Zelle ein
Entfernen Sie alle Seitenzahlen gleichzeitig in Excel
Fügen Sie die Seitenzahl in die Kopf- / Fußzeile eines Arbeitsblatts ein
Normalerweise können wir die Seitenzahlen schnell in die Kopf- oder Fußzeile einfügen, indem wir die Kopfzeile Fußzeile Funktion, bitte wie folgt vorgehen:
1. Gehen Sie zu dem Arbeitsblatt, in das Sie die Seitenzahlen in die Kopf- oder Fußzeile einfügen möchten.
2. Dann klick Insert > Kopfzeile Fußzeileund Ihr Arbeitsblatt wird in sein Seitenlayout Ansicht, siehe Screenshot:
3. Klicken Sie auf die Kopf- oder Fußzeile, in die Sie die Seitenzahl einfügen möchten, und dann auf a Design Registerkarte mit Kopf- und Fußzeilentools wird in der Multifunktionsleiste angezeigt, klicken Sie dann auf Design > Seitennummer, siehe Screenshot:
4. Und Sie können den Platzhalter sehen &[Seite] erscheinen im ausgewählten Bereich und klicken dann auf eine beliebige Stelle außerhalb des Kopf- oder Fußzeilenbereichs, um die Seitenzahlen anzuzeigen. Siehe Screenshot:
5. Jetzt können Sie durch Klicken auf die normale Ansicht zurücksetzen Anzeigen > NormalWenn Sie dieses Arbeitsblatt drucken, werden die Seitenzahlen in die von Ihnen ausgewählte Kopf- oder Fußzeile eingefügt.
Note: Wenn die Seitenzahlen im Format 1 von 15, 2 von 15 angezeigt werden sollen, müssen Sie dies nur direkt eingeben & [Seite] von & [Seiten] In das Feld für Kopf- oder Fußzeile siehe Screenshot:
Fügen Sie die Seitenzahl über mehrere Arbeitsblätter in die Kopf- / Fußzeile ein
Die obige Methode kann Ihnen beim Einfügen der Seitenzahlen in ein Arbeitsblatt helfen. Wenn Sie die Seitenzahlen in alle Arbeitsblätter der Arbeitsmappe einfügen möchten, damit alle Seiten in fortlaufender Reihenfolge nummeriert werden, gehen Sie wie folgt vor:
1. Wählen Sie alle Blattregisterkarten aus und gehen Sie zu Seitenlayout Registerkarte, und klicken Sie auf Schaltfläche zum Starten des Dialogfelds Symbol in der Seiteneinrichtung Gruppe, siehe Screenshot:
2. In dem Seiteneinrichtung Dialogfeld klicken Sie bitte Kopfzeile Fußzeile Und klicken Sie dann auf Benutzerdefinierte Kopfzeile or Benutzerdefinierte Fußzeile Informationen zum Festlegen der gewünschten Kopf- oder Fußzeile finden Sie in der Abbildung:
3. Und in der Kopfzeile or Fußzeile Im Dialogfeld definieren Sie den Ort, an dem die Seitenzahlen eingefügt werden, indem Sie in das Feld klicken Linker Abschnitt:, Mittelteil:, oder Rechter Abschnitt: Feld nach Bedarf und klicken Sie dann auf Seitenzahl einfügen Symbol und Platzhalter &[Seite] erscheint. Siehe Screenshot:
Hinweis: Geben Sie dies ein & [Seite] von & [Seiten] in das Feld für Kopf- oder Fußzeilen, wenn Sie die Seitenzahlen mögen, die als 1 von 45, 2 von 45 angezeigt werden…
4. Dann klick OK > OK Um die Dialogfelder zu schließen, können Sie beim Drucken dieser Arbeitsmappe in der Druckvorschau sehen, dass alle Seitenzahlen in aufeinanderfolgender Reihenfolge in die Kopf- oder Fußzeile eingefügt werden.
Fügen Sie die Seitenzahl mit dem VBA-Code in die Zelle ein
Es ist einfach für Sie, die Seitenzahlen in Kopf- oder Fußzeilen einzufügen. Wenn Sie jedoch die Seitenzahlen in eine Arbeitsblattzelle einfügen müssen, gibt es keine direkte Möglichkeit, dies zu tun. Der folgende VBA-Code kann Ihnen bei der Lösung dieses Problems helfen.
1. Klicken Sie auf eine Zelle, in der Sie die Seitenzahl dieser Zelle anzeigen möchten.
2. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Aktuelle Seitenzahl in eine Zelle einfügen:
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. Dann drücken F5 Taste, um diesen Code auszuführen, und die Seitenzahl dieser Zelle wird in der ausgewählten Zelle angezeigt, siehe Screenshot:
Entfernen Sie alle Seitenzahlen gleichzeitig in Excel
Um alle Seitenzahlen zu entfernen, können Sie die folgenden Schritte ausführen:
1. Wählen Sie alle Blattregisterkarten aus und gehen Sie zu Seitenlayout Klicken Sie auf die Multifunktionsleiste, und klicken Sie dann auf Schaltfläche zum Starten des Dialogfelds Symbol in der Seiteneinrichtung Gruppe, siehe Screenshot:
2. In dem Seiteneinrichtung Dialogfeld, klicken Sie auf Kopfzeile Fußzeile Registerkarte, und wählen Sie dann (Keine) von dem Kopfzeile or Fußzeile Dropdown-Liste, siehe Screenshot:
3. Dann klick OK Schaltfläche, werden alle Seitenzahlen auf einmal aus der Arbeitsmappe entfernt.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die 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 jeden Tag Hunderte von Mausklicks für Sie!
