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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）

TextToColumns メソッド TextToColumns メソッドを使用 …

: 出力位置、書き込み位置を設定（Tab 関数）

出力位置、書き込み位置を設定 Tab 関数は、Print メソッド、または P …

: 乱数を生成する（Rnd 関数）

Rnd 関数の使い方 Rnd 関数は、0 以上、1 未満の範囲の乱数を単精度浮動 …

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

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

: ショートカットメニュー（CommandBar オブジェクト）

ショートカットメニュー（コンテキストメニュー）右クリックで表示されるメニューの …

: 文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

InStrRev 関数任意の文字列の中で、指定した文字列を最後から検索して、見 …

: 文字列：文字列を指定した形式に変換する（StrConv 関数）

StrConv 関数の使い方【書式】 result = StrConv ( s …

: フォントの設定（Font プロパティ）

フォントの設定（Font プロパティ）指定されたオブジェクトのフォント情報（F …

: 引数の整数部分を取得する（Fix 関数・Int 関数）

Fix 関数・Int 関数の使い方【書式】 number_fix = Fix …

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

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

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