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, BerndDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen