IsNumeric (Funktion)

<< Click to Display Table of Contents >>

IsNumeric (Funktion)

IsNumeric(Variant)

Prüft, ob die übergebene Variant-Variable in eine Zahl umgewandelt werden kann.

Siehe auch: IsDate, IsEmpty, IsNull, VarType

Beispiel:

Sub Test

 Dim TestVar

 TestVar = InputBox("Geben Sie eine Zahl oder Text ein:")

 If IsNumeric(TestVar) Then

         MsgBox "Eingabe ist numerisch."

 Else

         MsgBox "Eingabe ist nicht numerisch."

 End If

End Sub