Office: Daten aus Zelle in Kopfzeile

Hallo!
Ich habe zwar gesucht, aber leider keine Antwort gefunden
Und zwar:
Gibt es eine Möglichkeit die Daten einer Zelle in die Kopfzeile zu bringen

Also z. B. in der Zelle A2 in Mappe1 steht "Test".
Nun möchte ich das "Test" in der Kopfzeile angezeigt wird.

Vielen Dank schon einmal für eure Hilfe :)

 

Hallo!

Mit "Kopfzeile" meinst du die grauen/blauen Spaltenköpfe, in denen A, B, C, usw. steht?
Falls ja, dann nein...leider.

PS: Was möchtest du damit bezwecken? Vielleicht gibt es ja einen Workaround.

 

nein, ich meine, wenn man auf "Seite einrichten" drückt kann man ja Textbausteine, wie z.B. das aktuelle Datum, der Dateiname etc einfügen.
Da wollte ich gerne den Wert einfügen.

 

Hallo!

Mit Bordmitteln von Excel ist das IMHO nicht möglich.
Ein schnelles Googeln führte mich hierhin:
http://www.office-loesung.de/ftopic307113_0_0_asc.php
Das müsste in deine Richtung gehen.

 

ah, ok. vielen dank.

 

Ich hab es nur schnell überflogen, aber es scheint a) in die Richtung zu gehen und b) etwas umständlich zu sein.

Es gibt eine relativ simple Möglichkeit: Das Ereignis "Vor Drucken" des "Workbook". Hier kann man in einem Mini-Makro das Seiten-Layout des "ActiveSheet" anpassen, bevor die Seite zum Drucker (oder auch nur in die Vorschau) geschickt wird.

Code:

Option Explicit

Private Sub Workbook_BeforePrint(Cancel As Boolean)

    ActiveSheet.PageSetup.CenterFooter = Trim$(ActiveSheet.Range("b2").Value)

End Sub

Das überträgt den Wert aus Zelle B2 as aktuellen Blatts vor jedem Drucken in die mittlere Fußzeile. Jeweils für Kopf und Fuß gibt es Links, Mitte und Rechts. Entsprechende Anpassungen wären also an

Code:

.CenterFooter

und

Code:

ActiveSheet.Range("b2")

vorzunehmen.

Gruß, Michael