Kleines Problem mit Fehlerwerten
19.10.2012 11:23:46
Maximilian
ich habe eine Funktion, die alle Datensätze mit einem bestimmten Wert löscht (Wenn Datum größer als 26.10.2012 ist):
Sub test()
i = 2
With Sheets("Tabelle1")
Do While i CDate("26.10.2010") Then
.Rows(i).Delete
Else: i = i + 1
End If
Loop
End With
End Sub
Problem ist, dass manche Werte in dem Datumsfeld fehlerhaft sind (#WERT), genau dort bricht dann alles ab und der Debugger startet. Diese Werte sollen nicht gelöscht werden. Wie mach ich das nun?Danke für eure Hilfe!