Hallo zusammen !!!
Ich habe folgendes Makro, welches mir den Druckbereich
einer Mappe eingrenzt.
Wieso wird vom Makro die Zelle "A1"
nicht berücksichtigt.
Wenn in der Zelle "A1" etwas
steht, und dann wieder z.B. in der Zelle "B3", so
startet der Druckbereich von A3 bis dorthin wo der letzte
Eintrag ist.
Wenn in der Zelle "B1" etwas
steht, und dann wieder z.B. in der Zelle "B3", dann
funktioniert das Makro.
'Druckbereich eingrenzen
Dim zl, sp
zl = Cells.Find("*", SearchDirection:=xlNext).Row
sp = Cells.Find("*", SearchDirection:=xlPrevious).Row
ActiveSheet.PageSetup.PrintArea = Range("A" & zl & ":L" & sp).Address
Kann mir jemand einen Tipp geben?
Grüße
Andreas