Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

変数が数値型かどうかをチェックする（ IsNumeric 関数）

2015/04/25

IsNumeric 関数の使い方

【書式】

result = IsNumeric ( expression )

【引数・戻り値】

expression ・・・調べる変数や式
result ・・・引数 expression が、数値として扱えるかどうかを調べた結果（ブール型：数値として扱える場合は、True ／それ以外の場合は、False ）。

IsNumeric 関数の使用例

サンプルVBAソース

　
Sub Sample_isnumeric()


    '以下、True を返す
    Debug.Print IsNumeric(42005)
    Debug.Print IsNumeric(-42.005)
    Debug.Print IsNumeric(0)
    Debug.Print IsNumeric("234.567")
    Debug.Print IsNumeric(12 ^ 7)
    Debug.Print IsNumeric(10 / 3)
    Debug.Print IsNumeric(Empty)
    Debug.Print IsNumeric("2000,4,11")
    Debug.Print IsNumeric(Sqr(10))
    Debug.Print IsNumeric(Int(Rnd * 6) + 1)

    Debug.Print
    
    '以下、False を返す
    Debug.Print IsNumeric(#4/1/2015#)
    Debug.Print IsNumeric(#6/21/2013 7:02:23 PM#)
    Debug.Print IsNumeric(DateSerial(2012, 1, 1))
    Debug.Print IsNumeric(Now)
    Debug.Print IsNumeric("1:20")
    Debug.Print IsNumeric("2005/9/1 11:30 AM")
    Debug.Print IsNumeric("昭和60年7月20日 1時30分")
    Debug.Print IsNumeric("おはよう！")
    Debug.Print IsNumeric("")
    Debug.Print IsNumeric(Null)
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

　

Sub Sample_isnumeric()

'以下、True を返す

Debug.Print IsNumeric(42005)

Debug.Print IsNumeric(-42.005)

Debug.Print IsNumeric(0)

Debug.Print IsNumeric("234.567")

Debug.Print IsNumeric(12 ^ 7)

Debug.Print IsNumeric(10 / 3)

Debug.Print IsNumeric(Empty)

Debug.Print IsNumeric("2000,4,11")

Debug.Print IsNumeric(Sqr(10))

Debug.Print IsNumeric(Int(Rnd * 6) + 1)

Debug.Print

'以下、False を返す

Debug.Print IsNumeric(#4/1/2015#)

Debug.Print IsNumeric(#6/21/2013 7:02:23 PM#)

Debug.Print IsNumeric(DateSerial(2012, 1, 1))

Debug.Print IsNumeric(Now)

Debug.Print IsNumeric("1:20")

Debug.Print IsNumeric("2005/9/1 11:30 AM")

Debug.Print IsNumeric("昭和60年7月20日 1時30分")

Debug.Print IsNumeric("おはよう！")

Debug.Print IsNumeric("")

Debug.Print IsNumeric(Null)

End Sub

　

実行結果

- VBA基本 IsNumeric 関数, VBA基本, エクセルVBA, 変数, 数値, 調査

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: フォント太字・斜体（Bold, Italic, FontStyle プロパティ）

太字の設定（Bold プロパティ） Bold プロパティは、フォントを太字にする …

: 配列の添字の最小値を「1」に設定する

Option Base ステートメントを使用する【書式】 Option Bas …

: メッセージボックスを表示（MsgBox関数）

MsgBox関数【書式】 result = MsgBox ( Prompt [ …

: VBA の演算子（算術演算子）

算術演算子算術演算を行うときに使用する演算子です。 ^（べき乗）、*（積）、/ …

: 日付時刻：経過時間を取得（ Timer 関数）

Timer 関数の使い方【書式】 result = Timer () 【戻り値 …

: 色の設定（ThemeColor プロパティ・TintAndShade プロパティ）

ThemeColor プロパティ・TintAndShade プロパティテーマカ …

: 指定した数値に対応する選択肢の値・数式を返す（Choose 関数）

Choose 関数の使い方 Choose 関数は、指定されたインデックス値（１ …

: 対象のオブジェクトをクリアする（Clear メソッド）

Clear メソッド対象となるオブジェクト全体をクリアします。Range オブ …

: オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）

MsoAutoShapeType 列挙型オートシェイプオブジェクトの図形の種類 …

: 乱数ジェネレータを初期化 (乱数系列を再設定) する（Randomize ステートメント）

Randomize ステートメントの使い方 Rnd 関数を使用する前に使用しま …

PREV: 変数が日付型かどうかをチェックする（ IsDate 関数）
NEXT: 変数がEmpty 値かどうかをチェックする（ IsEmpty 関数）