Guten Tag,
ich möchte gerne als Drucktitel den Inhalt einer Zelle (O62) drucken. Das habe ich im folgenden Listing angegeben, der Titel wird aber nicht gedruckt. Woran kann das liegen?
--------------------------------------------------
Sheets(27).PageSetup.PrintArea = "$A$1:$N$27"
With ActiveSheet.PageSetup
.Zoom = False
.Orientation = xlPortrait
.FitToPagesWide = 1
.FitToPagesTall = 1
.CenterHeader = Range("O62")
End With
Sheets(27).PrintOut Copies:=1, Collate:=True
Sheets(27).PageSetup.PrintArea = "$A$1:$R$63"
--------------------------------------------------
Vielen Dank für eine Hilfe.
Wolfgang