Hab folgenden Code, der alle Zeilen wo das Datum in der Spalte C nicht in einem Bereich zwischen zwei daten1,2 liegt, rauslöschen sollte.
Sub DatenLöschen()
Dim i As Integer
For i = 21 To 2 Step -1
If Sheets("DLZ").Range("c" & i).Value < "24.09.2006" Or _
Sheets("DLZ").Range("c" & i).Value > "15.03.2007" Then
Rows(i & ":" & i).Delete Shift:=xlUp
End If
Next i
End Sub
Leider löscht das mir alle Zeilen ...?
Was ist falsch an diesem Code ...? ...vielleicht hat es etwas mit dem Format zu tun ...in der Spalte C ist das Datums-Format ...?
Wie kann man so einen Datumsvergleich bewerkstelligen?
Danke im Voraus
Gruss Steve