PageSetUp
09.10.2006 15:22:11
Torsten
ich möchte über einen Code den Inhalt einer Zelle in den PageSetUp kopieren
und die Schriftart als "Fett" markieren. Das Auslesen der Zelle ist kein Problem, wohl aber die Schriftart: Beim Aufzeichen erhalte ich folgendes:
With ActiveSheet.PageSetup
...
.RightHeader = "&""Arial,Fett""3. Quartal 2006"
...
End with
Das ist doch aber nicht die notwendige Syntax, um dies in meinen Code zu integrieren:
With Sheets("Übersicht").PageSetup
.RightHeader = Sheets("SETT").Range("A16")
End With
Wer kann mir helfen?
Vielen Dank für Eure Tipps.
Gruß
Torsten