Ich möchte auf meine Tabelle alle Zeilen löschen, die in der Spalte A einen bestimmten Eintrag (Text) enthalten (Den Eintrag ist "#NV").
Wie könnte ich das machen ?
Viele Grüße und danke schonmal für die Antworten!
Jeanne
Columns(1).SpecialCells(xlcelltypeformulas, 16).EntireRow.Delete
bzw xlcelltypeconstants, wenn du die Formeln schon durch Werte ersetzt hast
Sub test()
Dim i As Integer
For i = 2 To ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
If IsError(ActiveSheet.Cells(i, 1).Value) Then
If ActiveSheet.Cells(i, 1).Text = "#NV" Then
ActiveSheet.Rows(i).EntireRow.Delete
End If
End If
Next i
End Sub
Grüße, Bernd