Guten Tag Community,
ich habe folgendes Problem: Ich suche einen Code der in einer Spalte einen Werte (z.B. < 0) sucht und unabhängig davon wie groß die Werte unter dem einen Wert (z.B. < 0) die restlichen Werte entfernt.
Bisher habe ich folgenden Code verwendet, dieser entfernt lediglch alle Werte kleiner als 0 und gibt mir dadurch fehlerhafte Ergebnisse:
lngLetzte = Cells(Rows.Count, "P").End(xlUp).Row
For i = lngLetzte To lngLetzte - 2 Step -1
If Cells(i, "P").Value < 0 Then
Cells(i, "P").Value = ""
Cells(i, "I").Value = ""
End If
|