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

関連記事

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

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

: VBA で正規表現を使う（RegExp オブジェクト）

RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …

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

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

: ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）

CentimetersToPoints メソッドセンチメートル単位の値をポイン …

: 文字列：文字列の指定した位置から指定文字数取得（Mid 関数,MidB 関数）

Mid 関数・MidB 関数の使い方【書式】 result_mid = Mi …

: 変数のデータ型・宣言（Dim ステートメント）

変数の宣言一般的な方法【書式】 Dim varname [ As type, …

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

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

: 色の設定（Color プロパティ・RGB 関数）

Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …

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

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

: 引数が省略されたかどうかをチェックする（ IsMissing 関数）

IsMissing 関数の使い方【書式】 result = IsMissing …

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