Hier legen Sie die Kopfzeile interaktiv fest
Hier legen Sie die Kopfzeile interaktiv fest

Kopf- und Fußzeilen einer Excel-Tabelle per Makro festlegen

So richten Sie Kopf- und Fußzeilen nach Ihren Wünschen per Makro für alle Tabellenblätter einer Arbeitsmappe ein

Über das Kommando SEITE EINRICHTEN legen Sie die Informationen für Kopf- und Fußzeilen in Excel fest. Dafür bietet Ihnen das Programm das Register KOPFZEILE/FUßZEILE an.

Über die Schaltfläche BENUTZERDEFINIERTE KOPFZEILE oder BENUTZERDEFINIERTE FUßZEILE können Sie die Inhalte für die Kopfzeile oder Fußzeile verändern. Die folgende Abbildung zeigt das Dialogfenster:

Hier ändern Sie die Einstellungen der Kopfzeile und Fußzeile

Wenn Sie alle Tabellenblätter einer Arbeitsmappe mit neuen Inhalten versehen möchten, können Sie die Festlegungen einfacher und schneller per Makro vornehmen.

Das folgende Makro legt für jedes Tabellenblatt in der Kopfzeile den Tabellennamen fest und trägt in der Fußzeile den Text "Vertraulich" ein:

Sub LegeKopfFussFest()
Dim Tabellenblatt As Worksheet
For Each Tabellenblatt In ActiveWorkbook.Worksheets
With Tabellenblatt.PageSetup
.LeftHeader = ""
.CenterHeader = Tabellenblatt.Name
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = "Vertraulich"
.RightFooter = ""
End With
Next Tabellenblatt
End Sub

Das Makro durchläuft alle Tabellenblätter der aktiven Arbeitsmappe. Wie im Dialogfenster SEITE EINRICHTEN werden die Kopfzeilen und Fußzeilen im Makro über die drei Bereiche RIGHT, CENTER, LEFT angesprochen. Das entspricht den Einstellungen