VBA～WorksheetFunction.IsNumberメソッド～Excel

VBAで指定したデータが数値か判定したい場合はWorksheetFunction.IsNumberメソッドを使います。数値ならばTRUEを返し、数値でなければFALSEを返します。

書き方

WorksheetFunction.IsNumber(テストの対象)

例として下の画像において下のコードを実行するとセルA1は数値なのでB列にTRUEが表示されます。それ以外は数値ではないのでFALSEが表示されます。

Sub test1()

Range("B2") = WorksheetFunction.IsNumber(Range("A2"))
Range("B3") = WorksheetFunction.IsNumber(Range("A3"))
Range("B4") = WorksheetFunction.IsNumber(Range("A4"))
Range("B5") = WorksheetFunction.IsNumber(Range("A5"))

End Sub