habe ein kleines Problem bei dem ihr mir bestimmt weiterhelfen könnt.
Ich möchte durch eine Schleife Spalte A prüfen lassen und jede Zeile in der 1 oder ein nicht nummerischer Wert steht löschen lassen.
Ich bekomme immer die Fehlermeldung "Laufezeitfehler 13 - Typen unverträglich"
Bin für jede Anregung dankbar :-)
Meine Schleife sieht bisher so aus:
Letzte ist eine Variable in der ich vorher alle gefüllten Zeilen ermittelt habe.
For i = 1 To Letzte 'Prüfe die Zeilen von 1 bis x
If Cells(i, 1).Value = "1" Then
Rows(i & ":" & i).Delete Shift:=xlUp
End If
Next i
Schon mal danke vorab für eure Hilfe.