Hallo,
wie kann ich diesem code sagen, das er aussteigen soll wenn er keine Fehlerwerte mehr findet?

Dim x As Long
Application.ScreenUpdating = False
For x = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
If Cells(x, 1) = CVErr(xlErrValue) Then Rows(x).Delete
Next x

Gruß
Maris