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

関連記事

: エラー（CVErr 関数・IsError 関数・Error 関数）

CVErr 関数（エラー番号をエラー値に変換する）の使い方【書式】 retur …

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

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

: VBA で正規表現を使う（RegExp オブジェクトのメソッド）

RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …

: 文字列：指定した文字の文字コードを取得する（Asc 関数）

Asc 関数【書式】 result = Asc ( string ) 引数・戻 …

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

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

: ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）

Partition 関数の使い方 Partition 関数は、ある数値が、区切 …

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

IsDate 関数の使い方【書式】 result = IsDate( expr …

: 指定した数のスペースを挿入する（Spc 関数）

指定した数のスペースを挿入指定した数のスペースを挿入するには、Spc 関数を使 …

: 配列の要素数を取得する（UBound 関数・LBound 関数）

UBound 関数・LBound 関数【書式】 result = UBound …

: 文字列：指定した文字コードに対応する文字を返す（Chr 関数）

Chr 関数の使い方【書式】 result = Chr ( code ) 引数 …

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