Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kopf-Fußzeile in alle Tabellenblätter übernehmen

Forumthread: Kopf-Fußzeile in alle Tabellenblätter übernehmen

Kopf-Fußzeile in alle Tabellenblätter übernehmen
07.09.2006 10:52:34
Fredi
Hallo Leute,
gibt es die Möglichkeit die Kopf und Fußzeilen eines vorher definierten Tabellenblattes in alle anderen Tabellenblätter einer ExcelDatei zu übertragen?
Vielleicht ein VBA Programm?
Danke
Fredi
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopf-Fußzeile in alle Tabellenblätter übernehmen
07.09.2006 11:02:10
Rudi
Hallo,
dein Musterblatt anklicken, dann Strg drücken und die anderen Blätter markieren.
Datei-Seite einrichten-OK
Fertig.
Gruß
Rudi
AW: Kopf-Fußzeile in alle Tabellenblätter übernehmen
07.09.2006 11:18:43
Ingo
hallo Fredi,

Sub kopf_u_Fusszeilen()
Dim wks As Worksheet, wks_def As Worksheet
Set wks_def = Sheets("DeinWorksheet")
For Each wks In ThisWorkbook.Sheets
With wks.PageSetup
.LeftHeader = wks_def.PageSetup.LeftHeader
.CenterHeader = wks_def.PageSetup.CenterHeader
.RightHeader = wks_def.PageSetup.RightHeader
.LeftFooter = wks_def.PageSetup.LeftFooter
.CenterFooter = wks_def.PageSetup.CenterFooter
.RightFooter = wks_def.PageSetup.RightFooter
End With
Next wks
End Sub

mfG
Ingo Christiansen
Anzeige
AW: Kopf-Fußzeile in alle Tabellenblätter übernehm
07.09.2006 11:24:20
Fredi
Danke Rudi, danke Ingo
genau so habe ich es mir vorgestellt.
Fredi

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Kopf- und Fußzeilen in alle Tabellenblätter übertragen


Schritt-für-Schritt-Anleitung

Um die Kopf- und Fußzeilen in Excel auf alle Tabellenblätter zu übertragen, kannst du folgende Schritte befolgen:

  1. Musterblatt auswählen: Klicke auf das Tabellenblatt, das die gewünschte Kopf- und Fußzeile enthält.
  2. Blätter markieren: Halte die Strg-Taste gedrückt und klicke auf die anderen Tabellenblätter, in die die Kopf- und Fußzeile übernommen werden sollen.
  3. Seite einrichten: Gehe zu Datei > Seite einrichten.
  4. Einstellungen überprüfen: Überprüfe die Einstellungen für die Kopf- und Fußzeilen und klicke auf OK.

Alternativ kannst du auch ein VBA-Skript verwenden, um die Kopf- und Fußzeilen automatisch zu übertragen:

Sub kopf_u_Fusszeilen()
    Dim wks As Worksheet, wks_def As Worksheet
    Set wks_def = Sheets("DeinWorksheet")
    For Each wks In ThisWorkbook.Sheets
        With wks.PageSetup
            .LeftHeader = wks_def.PageSetup.LeftHeader
            .CenterHeader = wks_def.PageSetup.CenterHeader
            .RightHeader = wks_def.PageSetup.RightHeader
            .LeftFooter = wks_def.PageSetup.LeftFooter
            .CenterFooter = wks_def.PageSetup.CenterFooter
            .RightFooter = wks_def.PageSetup.RightFooter
        End With
    Next wks
End Sub

Häufige Fehler und Lösungen

  • Fehler: Kopfzeile wird nicht übernommen
    Lösung: Stelle sicher, dass du die Blätter korrekt markiert hast. Überprüfe auch, ob du das richtige Musterblatt gewählt hast.

  • Fehler: Fußzeile auf einigen Blättern fehlt
    Lösung: Stelle sicher, dass die Fußzeile im Musterblatt korrekt eingerichtet ist und verwende die Seite einrichten-Option wie beschrieben.


Alternative Methoden

Falls du keine VBA-Programmierung nutzen möchtest, gibt es auch die Möglichkeit, die Kopfzeile auf alle Blätter manuell zu übertragen:

  1. Markiere die gewünschten Blätter.
  2. Gehe zu Seite einrichten und wähle die Kopf- und Fußzeilen manuell aus.
  3. Klicke auf OK, um die Einstellungen zu übernehmen.

Diese Methode ist besonders nützlich, wenn du nur geringfügige Änderungen vornehmen möchtest.


Praktische Beispiele

  • Beispiel 1: Wenn du eine Kopfzeile mit dem Titel deiner Excel-Datei auf allen Blättern einfügen möchtest, gehe wie folgt vor:

    • Füge in deinem Musterblatt die Kopfzeile "Mein Excel-Dokument" ein.
    • Übertrage die Kopfzeile mit den oben genannten Methoden.
  • Beispiel 2: Um eine Fußzeile mit dem Datum auf allen Blättern zu haben:

    • Füge in der Fußzeile deines Musterblatts das Datum ein.
    • Übertrage die Fußzeile auf alle Tabellenblätter.

Tipps für Profis

  • Nutze die Kopf- und Fußzeile-Option in Excel, um dynamische Inhalte wie das aktuelle Datum oder den Dateinamen automatisch einzufügen.
  • Erstelle Vorlagen mit vordefinierten Kopf- und Fußzeilen, die du für zukünftige Projekte verwenden kannst.
  • Bei der Verwendung von VBA, achte darauf, das Skript zu testen, um mögliche Fehler zu vermeiden.

FAQ: Häufige Fragen

1. Wie übertrage ich die Kopfzeile in Excel auf alle Arbeitsblätter?
Du kannst entweder die Seite einrichten-Funktion verwenden oder ein VBA-Skript nutzen, um die Kopfzeile automatisch zu übertragen.

2. Funktioniert das auch in Excel 2016 und Excel 365?
Ja, die beschriebenen Methoden zur Übertragung von Kopf- und Fußzeilen funktionieren in Excel 2016 sowie in Excel 365.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige