Office: (Office 2007) Daten aus einer Zelle in Kopfzeile/Fusszeile

Sali Hansueli

zu 1: ich habe Tabelle2 ausgedruckt und es war nichts in der Kopfzeile
zu 2: es müsste in allen Tabellen vorkommen
zu 3: ja

Besten Dank. Gruss Beat

 

Hallo Beat,

Dein Makro muss so aussehen (und nur so!):

Code:

 

Sali Hansueli

Besten Dank, es funktioniert (jedoch: Tabelle1 ist Tabelle2)

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim ws As Worksheet
For Each ws In ActiveWindow.SelectedSheets
ws.PageSetup.RightHeader = Tabelle2.Range("C8").Value
Next
End Sub

ZusatzfrageN:

1. Obiges bezieht sich auf Kopfzeile rechts: wenn der Inhalt zB in Arial, fett, 8Pt geschrieben sein soll. Wie geht dies ?
2. Wenn ich Kopfzeile links ansprechen will ?
3. Wenn ich Kopfzeile Mitte ansprechen will ?
4. Fusszeile links ?
5. Fusszeile Mitte ?
6. Fusszeile rechts ?

7. Wenn der Text 2-3-zeilig wäre ?

Besten Dank: Gruss Beat

 

Hallo Beat,

Antwort auf die Fragen 1-6 findest Du am einfachsten, wenn Du mal den Makro-Rekorder anwirfst und die entsprechenden Operationen durchführst. Auch ein Druck auf die F1-Taste im VB-Editor hilft, wenn Du z.B. den Cursor auf das Wort .PageSetup bewegt hast.

Zu Frage 7: Am besten die Zelle gleich so formatieren oder dann mit einem Befehl wie:
Code:

zusammensetzen.

 

Hallo zusammen,

dieser Trade hat mich schon weit gebracht. Danke dafür.

Leider hab ich jetzt ein Problem:

ich möchte den wert einer Zelle in der Fußzeile eines Diagrammblattes einfügen.
Wie stell ich das am besten an?
Ich verwende MS Office 2007 und meine VB Kentnisse sind miserabel...