ich habe in einer Funktion ein paar wenige Codezeilen zur Seiteneinrichtung (siehe unten). Diese laufen aber unter Excel 10.0 verhältnismäßig langsam. Damit meine User Excel nicht vorzeitig abbrechen, bräuchte ich einen Weg diese wenigen Zeilen zu optimieren, falls das möglich ist. (In eine einfache With-End With Schleife setzen hat keinen Einfluss auf die Geschwindigkeit)
Worksheets(WorkingSheet).PageSetup.Orientation = xlLandscape
Worksheets(WorkingSheet).PageSetup.RightFooter = "&F"
Worksheets(WorkingSheet).PageSetup.LeftFooter = "&P" & " von " & "&N"
Worksheets(WorkingSheet).PageSetup.CenterFooter = "___________________________" & vbLf & vbLf & "Druckdatum: &D"
Worksheets(WorkingSheet).PageSetup.RightHeader = "&B&14Nur zur Information"
Für Vorschläge wäre ich dankbar!
Grüße,
Evi