【VBA】数値かどうかを判定する【チェック】

VBAで
　・数値かどうかを判定
できます！
※「文字列」ではなく「数値」かどうかを判定できます。

VBA関数である
　・IsNumeric関数
により判定できます！

VBAコード
実行結果
参考

VBAコード

ここでは例として、
　・シート「sample」のセル「B3」の値を取得して
　・値が数値かどうかを判定
します。

Option Explicit

Sub sample()
    
    Dim targetNum As String
    
    '判定したいデータを取得
    targetNum = Worksheets("sample").range("B3")
    
    '数値かどうかを判定
    If IsNumeric(targetNum) = False Then
        MsgBox "数値以外が入力されています。数値を入力してください。"
    End If
    
End Sub

VBA関数「IsNumeric」により、数値かどうかを判定します(11行目)。
※数値でない場合、返り値は「False」になります。

実行結果

数値かどうかを判定できました。

参考

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●VBA関数「IsNumeric」

IsNumeric 関数 (Visual Basic for Applications)

Office VBA リファレンストピック