IsNumeric

---

構文

IsNumeric(expression)

引数expresionには、数式または文字列式を含むバリアント型の式を指定します。

解説

引数expresionが、数値として認識できる場合はTrueを返します。それ以外はFalseを返します。

IsNumeric関数は、引数expresionが日付式の場合はFalseを返します。

サンプル

次の例は、ユーザーが入力した値が数値かどうか判定します。

Sub Sample()
    Dim a As Variant
    a = InputBox("数値または文字を入力してください")
    If IsNumeric(a) Then
        MsgBox a & "は数値です"
    Else
        MsgBox a & "は文字です"
    End If
End Sub