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 auch 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.