wie kann ich die auf dem ersten Tabellenblatt erstellte Kopf- und Fußzeile auf alle anderen Tabellenblätter übertragen?
herzlichen Dank im Vorraus
Arend
Um die Kopf- und Fußzeile auf alle Blätter zu übertragen, kannst du folgende Schritte befolgen:
Tabellenblatt einrichten: Richte die Kopf- und Fußzeile auf dem ersten Tabellenblatt (z. B. Tab1) nach deinen Wünschen ein. Gehe zu Seitenlayout
> Kopf- und Fußzeile
.
Alle Blätter auswählen: Halte die Shift
-Taste gedrückt und klicke auf das letzte Tabellenblatt, um alle Blätter auszuwählen.
Seitenlayout anpassen: Klicke mit der rechten Maustaste auf eines der ausgewählten Tabellenblätter und wähle Seite einrichten
.
Bestätigen: Klicke auf OK
. Damit wird die Kopf- und Fußzeile für alle ausgewählten Tabellenblätter übernommen.
Fehler: Die Kopf- und Fußzeile sind nicht identisch auf allen Blättern.
Fehler: Kopf- und Fußzeile wird nicht angezeigt.
Datei
> Drucken
, um sicherzustellen, dass die Kopf- und Fußzeile aktiviert ist.Wenn du die Kopf- und Fußzeile für alle Tabellenblätter übernehmen möchtest, kannst du auch VBA verwenden:
VBA-Editor öffnen: Drücke ALT + F11
, um den VBA-Editor zu öffnen.
Neues Modul einfügen: Rechtsklicke im Projektfenster und wähle Einfügen
> Modul
.
Code einfügen:
Sub Set_Headers()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
With wks.PageSetup
.LeftHeader = "Links Oben"
.CenterHeader = "Mitte Oben"
.RightHeader = "Rechts Oben"
.LeftFooter = "Unten Links Seite: &P"
.CenterFooter = "Unten Mitte von Seiten: &N"
.RightFooter = "Unten Rechts Gedruckt am: &D"
End With
Next wks
End Sub
Makro ausführen: Schließe den VBA-Editor und führe das Makro aus.
Beispiel für die Fußzeile: Wenn du eine Fußzeile in mehreren Tabellenblättern erstellen möchtest, kannst du den obigen VBA-Code anpassen, um spezifische Inhalte hinzuzufügen, wie z. B. Seitenzahlen oder Datum.
Beispiel für mehrere Spalten: Wenn du eine Fußzeile mit 4 Spalten benötigst, kannst du die folgenden Zeilen im VBA-Code hinzufügen:
.CenterFooter = "Spalte 1: &A" & vbTab & "Spalte 2: &B" & vbTab & "Spalte 3: &C" & vbTab & "Spalte 4: &D"
Nutze den Makro-Rekorder, um schnell Makros für häufige Aufgaben aufzuzeichnen. Dies kann dir viel Zeit sparen, gerade wenn es um die Kopfzeile auf allen Blättern geht.
Experimentiere mit Datenfeldern in der Fußzeile (z. B. &P
für die Seitenzahl oder &D
für das Datum), um dynamische Inhalte einzufügen.
Wenn du mit Excel 2016 oder Excel 365 arbeitest, beachte die spezifischen Funktionen, die dir zur Verfügung stehen, um die Kopf- und Fußzeile auf alle Blätter zu übertragen.
1. Wie kann ich die Kopfzeile für alle Blätter in Excel 2016 übernehmen?
Du kannst die Schritte in der Schritt-für-Schritt-Anleitung befolgen oder den VBA-Code verwenden, um die Kopfzeile in allen Arbeitsblättern zu setzen.
2. Ist es möglich, die Fußzeile auf allen Tabellenblättern gleich zu machen?
Ja, du kannst die gleichen Schritte befolgen oder den VBA-Code anpassen, um sicherzustellen, dass die Fußzeile identisch auf allen Blättern ist.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen