Sub test()
If Range("A1").Text = "#Wert" Then
MsgBox "steht drin"
End If
End Sub
Gruß
tino
AW: Abfrage #Wert
19.03.2008 19:27:08
Tino
Hallo,
ich vergas es ist auf Schreibweise zu achten.
#WERT!
oder:
If LCase$(Range("A1").Text) = LCase$("#WERT!") Then
MsgBox "steht drin"
End If
Gruß
Tino
AW: Abfrage #Wert
19.03.2008 19:20:00
René
Hallo
Ich bin mir nicht sicher ob bei Excelversion 9.0 die Formel funktioniert, aber probiers mal damit.
=WENN(FEHLER.TYP($A$1)=3;"Fehler: #WERT";FEHLER.TYP($A$1))
In diesem Fall wird die Zelle A1 explicit auf den Fehlertyp #WERT geprüft.
Der Fehler #WERT hat die Fehlernummer 3.
Ist es ein anderer Fehler, wird die Nummer ausgegeben.
Gruß René
Anzeige
AW: Abfrage #Wert
19.03.2008 21:55:05
Beate
Hallo, Sub test2() If Range("A1").Formula = "#VALUE!"Then MsgBox "steht drin" EndIf EndSub