Hallo Ihr,
möchte mittels nachstehendem Code den Druckbereich festlegen, aber in der zweiten Zeile bleibt er immer hängen....
With Worksheets("WKKlasseBeginner").PageSetup
If .Range("A46").Value "" Then
.PrintArea = "A1:AB86"
Else: .PrintArea = "A1:AB45"
End If
End With
Kann mir jemand sagen wo der Fehler liegt?
Danke
Peter S.