変数が数値型かどうかをチェックする( 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 |
実行結果
関連記事
-
-
日付時刻:日付時刻データを計算( DateAdd 関数 )
DateAdd 関数(日付・時刻の値を加算・減算結果を取得) 【書式】 resu …
-
-
メッセージボックスを表示(MsgBox関数)
MsgBox関数 【書式】 result = MsgBox ( Prompt [ …
-
-
テキストファイル(UTF-8)を読み込み、書き出し(ADODB.Stream)
Stream オブジェクト ADO(ActiveX Database Objec …
-
-
指定した文字列を数値に変換する(Val 関数)
Val 関数 の使い方 Val 関数は、指定した文字列に含まれる数字を数値として …
-
-
書式を変換(Format 関数)
Format 関数の使い方 【書式】 result = Format ( exp …
-
-
ショートカットメニュー(CommandBar オブジェクト)
ショートカットメニュー(コンテキストメニュー) 右クリックで表示されるメニューの …
-
-
エラー(CVErr 関数・IsError 関数・Error 関数)
CVErr 関数(エラー番号をエラー値に変換する)の使い方 【書式】 retur …
-
-
Math 関数( Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan )
Abs 関数 【書式】 value = Abs ( number ) 【引数・戻 …
-
-
配列(多次元配列・配列の次元の変更)
多次元配列 【書式】 多次元配列の宣言 <静的配列(固定長配列)> Dim my …
-
-
指定した数のスペースを挿入する(Spc 関数)
指定した数のスペースを挿入 指定した数のスペースを挿入するには、Spc 関数を使 …
