Hallo Jenny,
das kann nicht funktionieren. Du prüfst nicht ob die Zelle den Fehlerwert #Error enthält, der vermutlich aus einer formel entsteht, sondern du prüfst auf den String "#Error", der als solcher nicht in der Zelle enthalten ist.
Probiers mal so: If IsError(.Cells(4, Spalte)) Then Damit wird geprüft ob, die Zelle einen Fehlerwert irgendeiner Art enthält.
wenn du auf einen spezifischen Fehler prüfen willst musst du den Fehlerwert zuvor mit Cstr() umwandeln. So entspricht der Fehler #NV z.B. dem String "Fehler 2042"
Ermittle also die exakte Fehlernummer - z.B. mit Msgbox CStr(.Cells(4, Spalte).Value) - und prüfe dann auf den exakten String.
z.B. If Cstr(.Cells(4, Spalte).Value) = "Fehler 2000" Then
Gruß Mr. K.
|