変数が数値型かどうかをチェックする( IsNumeric 関数 )
IsNumeric 関数の使い方
【書式】
result = IsNumeric ( expression )
【引数・戻り値】
- expression ・・・ 調べる変数や式
- result ・・・ 引数 expression が、数値として扱えるかどうかを調べた結果(ブール型:数値として扱える場合は、True / それ以外の場合は、False )。
IsNumeric 関数の使用例
サンプルVBAソース
|
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 |
実行結果
関連記事
-
-
オートシェイプの種類を表す定数(MsoAutoShapeType 列挙型)
MsoAutoShapeType 列挙型 オートシェイプオブジェクトの図形の種類 …
-
-
列挙型変数(Enum ステートメント)
列挙型変数を使う 列挙型変数を使用するには、Enum ステートメントを使って、宣 …
-
-
データ型変換関数
データ型変換関数の使い方 【書式】 function ( expression …
-
-
出力位置、書き込み位置を設定(Tab 関数)
出力位置、書き込み位置を設定 Tab 関数 は、Print メソッド、または P …
-
-
対象のオブジェクトをクリアする(Clear メソッド)
Clear メソッド 対象となるオブジェクト全体をクリアします。Range オブ …
-
-
指定した文字列を数値に変換する(Val 関数)
Val 関数 の使い方 Val 関数は、指定した文字列に含まれる数字を数値として …
-
-
引数の整数部分を取得する(Fix 関数・Int 関数)
Fix 関数・Int 関数の使い方 【書式】 number_fix = Fix …
-
-
Array 関数(バリアント型の配列を作成)
Array 関数の使い方 【書式】 myArray = Array ( elem …
-
-
指定した数のスペースを挿入する(Spc 関数)
指定した数のスペースを挿入 指定した数のスペースを挿入するには、Spc 関数を使 …
-
-
データをクリアする(ClearContents メソッド)
ClearContents メソッド 対象がセル範囲(Range オブジェクト) …
