Wie kann man in einer Excel-Arbeitsmappe unterschiedliche Kopf- oder Fußzeilen für jede einzelne Seite festlegen?
Standardmäßig wird beim Hinzufügen einer Kopf- oder Fußzeile zu einem Excel-Arbeitsblatt der Inhalt einheitlich auf jede gedruckte Seite angewendet. Dieses Standardverhalten ist für Konsistenz praktisch, doch gelegentlich benötigen Sie möglicherweise auf jeder Seite individuelle Informationen. Beispielsweise kann beim Drucken von Finanzberichten, Schülerlisten oder Formularen mit verschiedenen Abschnitten eine separate Kopf- oder Fußzeile pro Seite den Ausdruck übersichtlicher gestalten und die einzelnen Abschnitte klar voneinander abgrenzen. Allerdings erlauben die integrierten Werkzeuge von Excel lediglich das Festlegen einer einzigen Kopf- oder Fußzeile für alle Seiten, was die Flexibilität ohne fortgeschrittene Methoden einschränkt. Im Folgenden zeigen wir Ihnen Schritt für Schritt, wie Sie individuelle Kopf- oder Fußzeilen für jede Seite Ihres Excel-Arbeitsblatts festlegen können.
Unterschiedliche Kopf- oder Fußzeilen pro Seite mithilfe von VBA-Code anwenden
Unterschiedliche Kopf- oder Fußzeilen pro Seite mithilfe von VBA-Code anwenden
Die folgende Lösung nutzt ein VBA-Makro, um jeder gedruckten Seite eine feste Kopf- oder Fußzeile zuzuweisen. Diese Methode eignet sich ideal, wenn jeder Abschnitt Ihres Dokuments – beispielsweise Kapitel, Klassen oder Monatsberichte – einen eindeutigen Bezeichner benötigt. Obwohl die Einrichtung etwas Vorarbeit erfordert, ermöglicht das Makro nach der Konfiguration ein schnelles Drucken verschiedener Abschnitte mit jeweils individuellem Kopf- oder Fußzeileninhalt.
1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie im Fenster Microsoft Visual Basic for Applications auf Einfügen > Modul. Kopieren Sie anschließend den unten stehenden VBA-Code in das Code-Fenster. Falls Sie neu im Umgang mit Makros sind: Module sind die Bereiche, in denen VBA-Code zur Ausführung gespeichert wird. Orientieren Sie sich am Screenshot:
VBA-Code: Unterschiedliche Kopfzeilen pro Seite in Excel anwenden
Sub DifferentHeaderFooter()
Dim ws As Worksheet
Dim vLeft As Variant, vRight As Variant, xRg As Variant
Set ws = ActiveSheet
On Error Resume Next
vLeft = Array("First page", "Second page", "Third page", "fourth page")
xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200")
Application.ScreenUpdating = False
For i = 0 To UBound(vLeft)
With ws.PageSetup
.PrintArea = xRg(i)
.LeftHeader = vLeft(i)
End With
ws.PrintPreview
Next i
Application.ScreenUpdating = True
ws.PageSetup.PrintArea = ""
End Sub
Hinweise und Parametererklärungen:
3. Drücken Sie die Taste F5, um das Makro auszuführen. Dadurch wird der Code ausgeführt und das Vorschau-Fenster geöffnet. Klicken Sie dort auf die Schaltfläche Drucken, um mit dem Drucken jedes definierten Abschnitts samt seiner zugewiesenen Kopf- oder Fußzeile zu beginnen.
Hinweis: Wenn Ihr Arbeitsblatt vier festgelegte Druckbereiche enthält, müssen Sie die Schaltfläche Drucken viermal anklicken – jeweils einmal pro Abschnitt –, um alle Seiten mit ihren individuellen Kopf- oder Fußzeilen zu drucken. Das Makro druckt jeden Abschnitt nacheinander, daher müssen Sie die Druckaktion für jeden einzelnen Abschnitt wiederholen.
Zusammenfassend: Obwohl Excel innerhalb eines einzelnen Arbeitsblatts keine unterschiedlichen Kopf- oder Fußzeilen pro Seite nativ unterstützt, bietet die Verwendung von VBA-Makros eine praktikable und flexibel anpassbare Lösung. Prüfen Sie stets Ihre Einstellungen sowie den gedruckten Output und ziehen Sie für komplexe Anforderungen alternative Ansätze in Betracht. Müssen Sie gedruckte Seiten regelmäßig personalisieren, spart die Automatisierung dieses Prozesses mit VBA erheblichen manuellen Aufwand.
Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
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 zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins