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

関連記事

: RGB 値一覧表（XlRgbColor 列挙型）

RGB 値（XlRgbColor 列挙型）一覧表 RGB 関数を使用して、出力さ …

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

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

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: 日付時刻：日付時刻データを計算（ DateAdd 関数）

DateAdd 関数（日付・時刻の値を加算・減算結果を取得）【書式】 resu …

: 日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）

現在の日付・時刻を取得・設定現在の日付・時刻を取得（Now 関数、Date 関 …

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

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

: Array 関数（バリアント型の配列を作成）

Array 関数の使い方【書式】 myArray = Array ( elem …

: 色の設定（ColorIndex プロパティ・Colors プロパティ）

ColorIndex プロパティ ColorIndex プロパティは、指定したオ …

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

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

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

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

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