Wie kann man einen Zellenwert in die Kopf- oder Fußzeile in Excel einfügen?

In Microsoft Excel ist es einfach, Informationen wie den Dateipfad, den Dateinamen, das aktuelle Datum oder andere integrierte Details mithilfe von nativen Excel-Funktionen in Kopf- oder Fußzeilen einzufügen. Es gibt jedoch Szenarien, in denen Sie den tatsächlichen Inhalt einer bestimmten Zelle als Kopf- oder Fußzeile verwenden müssen. Diese Funktion wird nicht direkt über die Standardoberfläche von Excel bereitgestellt, was die Frage aufwirft: Wie können Sie einen Zellenwert in die Kopf- oder Fußzeile Ihres Arbeitsblatts einfügen? Viele Benutzer stoßen bei der Vorbereitung von Berichten, Formularen oder Datenausgaben auf diese Anforderung, wo dynamische Informationen wie ein Klientenname oder ein benutzerdefiniertes Datum in der Kopf- oder Fußzeile des Drucks erscheinen sollen, damit jeder Ausdruck den aktuellsten Kontext aus dem Blatt selbst enthält. Die unten aufgeführten Lösungen befassen sich mit dieser Notwendigkeit und zeigen sowohl VBA- als auch Drittanbieter-Ansätze und diskutieren, wann jede Methode am besten geeignet ist.

Zellenwert in die Kopf- oder Fußzeile eines Arbeitsblatts mit VBA-Code einfügen

Zellenwert in die Kopf- oder Fußzeile aller Arbeitsblätter mit VBA-Code einfügen

Dateiinformationen mit Kutools für Excel in die Kopf- oder Fußzeile einfügen

Manuelles Kopieren von Zelleninhalten in das Kopf- oder Fußzeilenfenster

Zellenwert in die Kopf- oder Fußzeile eines Arbeitsblatts mit VBA-Code einfügen

Wenn Sie den Inhalt einer bestimmten Zelle in der Kopf- oder Fußzeile Ihres aktuellen Arbeitsblatts anzeigen möchten, ist dies über die Standardkopf-/Fußzeilen-Schnittstelle von Excel nicht möglich. Sie können dies jedoch mit einem einfachen VBA-Makro erreichen.

Speichern Sie Ihre Arbeitsmappe vor dem Ausführen von VBA-Code, da Makros Objekte ändern und nicht rückgängig gemacht werden können. Stellen Sie außerdem sicher, dass Ihre Excel-Einstellungen das Ausführen von Makros erlauben.

1. Aktivieren Sie das Arbeitsblatt, in das Sie einen Zellenwert in die Kopf- oder Fußzeile einfügen möchten. Drücken Sie ALT + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code in das neue Modulfenster ein.

VBA-Code: Einen bestimmten Zellenwert in die Kopfzeile eines Arbeitsblatts einfügen

Sub HeaderFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftHeader = WorkRng.Range("A1").Value
End Sub

3Drücken Sie F5 (oder klicken Sie auf die Schaltfläche Ausführen), um dieses Makro auszuführen. Ein Dialogfeld wird angezeigt, das Sie auffordert, die Zelle auszuwählen, deren Wert Sie in der Kopfzeile verwenden möchten.

4Wählen Sie die Zelle aus und klicken Sie auf OK, dann wird der Wert der gewählten Zelle in die linke Kopfzeile Ihres aktiven Arbeitsblatts eingefügt. Um die Kopfzeile anzuzeigen, gehen Sie zu Datei > Drucken (oder verwenden Sie Seitenlayout Ansicht). Siehe Beispiel unten:

Hinweise:

• Wenn Sie den Inhalt der Zelle in der Fußzeile anstatt in der Kopfzeile anzeigen möchten, verwenden Sie den folgenden Code. Die Bedienungsschritte sind dieselben – fügen Sie diesen Code einfach in ein Modul ein und führen Sie ihn aus.

VBA-Code: Einen bestimmten Zellenwert in die Fußzeile eines Arbeitsblatts einfügen

Sub FooterFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftFooter = WorkRng.Range("A1").Value
End Sub

• Um die Position zu ändern, ersetzen Sie LeftHeader oder LeftFooter im Code nach Bedarf durch CenterHeader, RightHeader, CenterFooter oder RightFooter. Zum Beispiel, um den Wert in der mittleren Kopfzeile einzufügen, ändern Sie LeftHeader zu CenterHeader.
• Stellen Sie immer sicher, dass der Zellenbezug gültig ist, bevor Sie das Skript ausführen. Wenn Sie versuchen, eine leere Zelle zu referenzieren, bleibt die Kopf- oder Fußzeile leer.
• Nachdem Sie das Makro ausgeführt haben, wird die Kopf- oder Fußzeile nicht automatisch aktualisiert, wenn Sie die Quellzelle ändern; Sie müssen das Makro erneut ausführen, um die angezeigten Informationen zu aktualisieren.
• Diese VBA-Methode wird empfohlen, wenn Sie Aktionen von Zelle zu Kopfzeile automatisieren möchten, ohne häufige Updates zu benötigen, oder wenn Sie an Vorlagen mit dynamischem Inhalt pro Ausdruck arbeiten.
• Wenn Sie eine „Makros sind deaktiviert“-Warnung erhalten, stellen Sie sicher, dass Makroeinstellungen in Datei > Optionen > Vertrauenszentrum aktiviert sind.

Zellenwert in die Kopf- oder Fußzeile aller Arbeitsblätter mit VBA-Code einfügen

Wenn Sie den Wert einer bestimmten Zelle als Kopf- oder Fußzeile in allen Blättern Ihrer Arbeitsmappe anwenden möchten, wäre es zeitaufwendig, den vorherigen Code für jedes Arbeitsblatt einzeln auszuführen. In solchen Fällen können Sie ein anderes VBA-Makro verwenden, das dafür entwickelt wurde, den Inhalt einer ausgewählten Zelle in die Kopf- oder Fußzeile aller Arbeitsblätter Ihrer Arbeitsmappe in einem Vorgang einzufügen. Dies ist üblich, wenn Sie Berichte verteilen, die durchgehend konsistente Kopf- und Fußzeileninformationen enthalten sollten.

1. Öffnen Sie die Arbeitsmappe, in der Sie die Änderung anwenden möchten, und drücken Sie ALT + F11, um das Visual Basic for Applications-Fenster zu starten.

2. Klicken Sie im VBA-Editor auf Einfügen > Modul, dann kopieren und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Einen bestimmten Zellenwert in die Fußzeile aller Arbeitsblätter einfügen

Sub AddFooterToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftFooter = WorkRng.Range("A1").Value
Next
End Sub

3. Drücken Sie F5, um dieses Makro auszuführen. Ein Dialogfeld wird angezeigt, in dem Sie die Zielzelle auswählen können, deren Wert in der Fußzeile jedes Arbeitsblatts erscheinen soll.

4Sobald Sie die Zelle ausgewählt haben und auf OKklicken, wird dieser Zellenwert in die linke Fußzeile jedes Arbeitsblatts in der Arbeitsmappe eingefügt. Sie können die Zuweisung der Fußzeile überprüfen, indem Sie zu Datei > Drucken.

Hinweise:

• Um einen Zellenwert in der Kopfzeile über alle Arbeitsblätter hinweg zu verwenden, wenden Sie stattdessen den folgenden Code an. Der Prozess zum Eingeben und Ausführen des Codes ist identisch:

VBA-Code: Einen bestimmten Zellenwert in die Kopfzeile aller Arbeitsblätter einfügen

Sub AddHeaderToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftHeader = WorkRng.Range("A1").Value
Next
End Sub

• Um den Wert in der rechten oder mittleren Position der Kopf- oder Fußzeile einzufügen, ersetzen Sie einfach LeftHeader/LeftFooter im Skript durch CenterHeader/CenterFooter oder RightHeader/RightFooter.
• Beachten Sie, dass Rückgängig-Aktionen nicht für Änderungen gelten, die mit VBA-Makros vorgenommen wurden. Speichern Sie Ihr Dokument vorher, um Datenverlust zu vermeiden, falls das Ergebnis unerwartet ist.
• Dieser Ansatz eignet sich am besten für Arbeitsmappen, in denen alle Blätter gemeinsame Kopf- oder Fußzeilenanforderungen haben. Wenn die Blätter unterschiedliche Inhalte benötigen, sollten Sie das Einzelblatt-Makro separat auf jedem ausführen.
• Wenn Sie Probleme feststellen, bei denen Kopf- oder Fußzeilen nicht wie erwartet aktualisiert werden, stellen Sie sicher, dass Sie keine geschützten Blätter oder Arbeitsmappen-Schutz aktiviert haben.

Dateiinformationen mit Kutools für Excel in die Kopf- oder Fußzeile einfügen

In Fällen, in denen Sie schnell und flexibel dateibezogene Informationen wie den Arbeitsblattnamen, den Arbeitsmappennamen oder den Dateipfad in die Kopf- oder Fußzeile einfügen möchten, bietet Kutools für Excel ein spezielles Hilfsprogramm namens Workbook Information einfügen. Dieses Tool ist besonders geeignet, wenn Sie eine lösungsansatzfreie Lösung bevorzugen, Batch-Verarbeitung benötigen oder mehrere integrierte Dokumenteneigenschaften ohne manuelle Eingabe oder Fehlergefahr einfügen möchten. Kutools macht den Prozess für Benutzer zugänglich, die keine Interaktion mit VBA wünschen oder regelmäßig Header/Fußzeilen basierend auf Arbeitsmappendaten aktualisieren müssen.

Nach der kostenlosen Installation von Kutools für Excel folgen Sie diesen Schritten:

1. Gehen Sie zu Kutools Plus Registerkarte, dann wählen Sie Arbeitsmappe > Workbook Information einfügen.

2. Wählen Sie im Dialogfeld 'Workbook Information einfügen' die spezifischen Informationen aus, die Sie einfügen möchten (z.B. Arbeitsmappenpfad, Dateiname, Arbeitsblattname usw.) im Abschnitt 'Informationen'. Geben Sie dann an, ob Sie sie in die Kopf- oder Fußzeile einfügen möchten, indem Sie Kopfzeile oder Fußzeile markieren.

Tipp: Sie können die Position innerhalb der Kopf- oder Fußzeile – Mitte, Links oder Rechts – mit den Ortsangaben auswählen. Dies ist hilfreich für strukturierte Layouts, z.B. den Dateipfad links und den Blattnamen in der Mitte zu platzieren.

3. Klicken Sie auf OK um Ihre Einstellungen zu übernehmen. Um die Ergebnisse zu überprüfen, gehen Sie zu Ansicht > Seitenlayout oder verwenden Sie Datei > Druckvorschau.

Mit der Funktion 'Workbook Information einfügen' können Sie diese Informationen auch direkt in Zellen oder einen Zellbereich einfügen - so können Sie solche Details für Formeln, Anzeige oder weitere Automatisierungsaufgaben nutzen. Klicken Sie hier, um mehr über dieses Hilfsprogramm zu erfahren.

Diese Methode funktioniert besonders gut für Benutzer, die einfachen Zugriff auf Dokumenteigenschaften ohne Interaktion mit Makros oder Formeln wünschen. Im Vergleich zur manuellen Bearbeitung stellt Kutools Konsistenz sicher und spart erheblich Zeit, insbesondere für diejenigen, die regelmäßig Dokumentreferenzen aktualisieren müssen.

Wenn die Informationen in Ihrer Kopf- oder Fußzeile nicht automatisch zu aktualisieren scheinen, prüfen Sie, ob die Arbeitsmappe auf manuelle Berechnung eingestellt ist, da einige Kopf- oder Fußzeilen eine Dokumentaktualisierung erfordern, um die neuesten Daten anzuzeigen.

Manuelles Kopieren von Zelleninhalten in den Kopf- oder Fußzeilen-Dialog

Wenn Sie die Kopf- oder Fußzeile nur gelegentlich mit Zelleninhalt aktualisieren müssen und VBA und Add-ins vermeiden wollen, können Sie den Zellenwert kopieren und manuell in den Kopf- oder Fußzeilen-Dialog einfügen. Doppelklicken Sie auf den Kopf- oder Fußzeilenabschnitt im Seitenlayoutmodus und fügen Sie den Zellenwert mit Strg+V ein. Der Nachteil ist, dass dies manuell erfolgt – Sie müssen den Wert jedes Mal aktualisieren, wenn er sich ändert.

Bei der Verwendung manueller oder Drucktitel-Ansätze bedenken Sie, dass diese weniger dynamisch für "echte" Kopf- oder Fußzeilenplatzierung sind und jedes Mal eine Aktion erfordern, wenn sich die zugrunde liegenden Informationen ändern. Auf der anderen Seite bieten VBA-Makros und Tools wie Kutools optimierte, wiederholbare Workflows, die besonders nützlich für große Arbeitsmappen oder automatisierte Berichtsgenerierung sind. Wenn Sie unerwartetes Verhalten oder Fehler mit VBA feststellen, überprüfen Sie immer Ihre Makro-Sicherheitseinstellungen und kontrollieren Sie, ob Tabellenblätter gesperrt oder geschützt sind. Bevor Sie Drittanbieter-Add-ins verwenden, vergewissern Sie sich, dass sie von seriösen Quellen stammen und mit Ihrer Excel-Version kompatibel sind. Bei der Arbeit mit sensiblen oder kritischen Dateien ist es eine gute Praxis, vor dem Ausführen von Makros ein Backup zu erstellen.

Demo: Arbeitsmappeninformationen in Zelle/Kopfzeile/Fußzeile einfügen

Verwandte Artikel:

Wie fügt man Dateinamen oder Pfad in eine Zelle / Kopf- oder Fußzeile in Excel ein?

Wie fügt und löscht man Kopfzeile, Fußzeile und Kopfbild in Excel ein?