[Excel] Zeilen mit #NV automatisch löschen

Computer: Software & Programmierung Visual Basic
#1

Hallo allerseits!

Ich schreibe gerade an einem Makro, welches unter anderem aus einer Excel-Tabelle alle Zeilen die in einer bestimmten Spalte den Fehler #NV (Wert nicht vorhanden) enthalten, löschen soll.

Ich habe dazu in einer Zählschleife folgenden Code verwendet:

If Cells(n, 4).Value = „#NV“ _
Then
Rows(„n:n“).Select
Selection.Delete Shift:=xlUp
End If

Dummerweise steigt das Makro bei der If-Abfrage mit dem Laufzeitfehler 13 „Typen unverträglich“ aus.
Scheinbar wird das „#NV“ nicht als Zeichenfolge, sondern direkt als Fehlercode interpretiert, obwohl ich die Werte mit Kopieren/Inhalte einfügen/Werte von ihren ursprünglichen Formeln befreit hatte.

Wie lässt sich das Problem denn statt dessen lösen?

Gruß

Stefan

#2

Servus Stefan

Probier’s einmal so:

If **VarType(Cells(n, 4)) = vbError** then
 Rows("n:n").Select
 Selection.Delete Shift:=xlUp
End If

Schöne Grüße
Roland

#3

Danke! Genau das war die Lösung! [OWT]
.