Seitenzahlen in Excel einfügen und fortlaufend drucken
Schritt-für-Schritt-Anleitung
Um in Excel Seitenzahlen fortlaufend einzufügen und zu drucken, kannst Du folgende Schritte befolgen:
-
Tabellenblatt vorbereiten: Stelle sicher, dass Dein Tabellenblatt fertig ist und korrekt aussieht.
-
Makro erstellen: Öffne den VBA-Editor mit Alt + F11.
-
Modul einfügen: Klicke mit der rechten Maustaste auf "Microsoft Excel Objekte" und wähle "Modul" einfügen.
-
Code einfügen: Kopiere den folgenden Code in das Modul.
Sub DruckenSeiteXmal()
Dim pTabelle As String
Dim Xmal As Integer
pTabelle = "Drucken" ' Name Tabellenblatt
ThisWorkbook.Activate
For Xmal = 1 To 50
' Fußzeile
With Sheets(pTabelle).PageSetup
.LeftFooter = "" ' Linker Bereich
.CenterFooter = "" ' Mittlerer Bereich
.RightFooter = "Seite: " & Xmal ' Rechter Bereich
End With
' Drucken
Sheets(pTabelle).PrintOut
Next Xmal
End Sub
-
Makro ausführen: Gehe zu Extras > Makro > Makros... oder drücke Alt + F8, wähle das Makro "DruckenSeiteXmal" aus und klicke auf "Ausführen".
Jetzt solltest Du in der Lage sein, die Seitenzahlen in Excel fortlaufend von 1 bis 50 zu drucken.
Häufige Fehler und Lösungen
Alternative Methoden
Wenn Du keine Makros verwenden möchtest, kannst Du die Seitenzahl auch manuell in die Fußzeile einfügen:
- Gehe zu
Seitenlayout > Seiteneinrichtung.
- Klicke auf
Kopf- und Fußzeile.
- Wähle die Option zur Fußzeile und füge die Seitenzahl mit der Platzhalterfunktion ein:
Seite [Seite] von [Seiten].
Dies ist jedoch nicht so flexibel wie die Makro-Lösung, insbesondere wenn Du mehrere Tabellenblätter hast.
Praktische Beispiele
-
Seitenzahlen auf mehreren Tabellenblättern: Wenn Du Seitenzahlen über mehrere Tabellenblätter hinweg drucken möchtest, kannst Du das Makro anpassen, indem Du eine Schleife über die gewünschten Blätter hinzufügst.
-
Erweiterung des Makros: Du kannst die Zeile For Xmal = 1 To 50 anpassen, um die Anzahl der Kopien zu ändern, z.B. For Xmal = 1 To 2 für 2 Kopien.
Tipps für Profis
- Nutze die
PageSetup-Eigenschaften, um das Layout Deiner Seiten anzupassen, bevor Du druckst.
- Teste Dein Makro mit einer geringeren Anzahl an Seiten, um sicherzustellen, dass alles funktioniert, bevor Du 50 Seiten druckst.
- Speichere Deine Arbeitsmappe regelmäßig, insbesondere wenn Du mit VBA arbeitest, um Datenverlust zu vermeiden.
FAQ: Häufige Fragen
1. Wie füge ich in Excel die Seitenzahl für mehrere Tabellenblätter hinzu?
Du kannst ein Makro erstellen, das durch die gewünschten Tabellenblätter iteriert und die Seitenzahl in die Fußzeile jeder Tabelle einfügt.
2. Was ist der Unterschied zwischen „Seite 1 von 2“ und „Seite 1 von x“?
„Seite 1 von 2“ zeigt die Anzahl der Seiten an, während „Seite 1 von x“ eine dynamische Anzahl darstellt, die automatisch angepasst wird, je nachdem, wie viele Seiten es gibt.