変数が数値型かどうかをチェックする( 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 |
実行結果
関連記事
-
-
ユーザー設定リストを使って並べ替える(Sort)
VBAでリスト、テーブルを並べ替える(Sort) VBAで、ソートを行うには、S …
-
-
インプットボックスを表示する(InputBox関数・InputBoxメソッド)
「InputBox関数」と「InputBoxメソッド」の違い 「InputBox …
-
-
Join 関数(配列の要素を結合)
Join 関数 1次元配列の各要素を指定した区切り文字で連結します。 【書式】 …
-
-
フォント 太字・斜体(Bold, Italic, FontStyle プロパティ)
太字の設定(Bold プロパティ) Bold プロパティは、フォントを太字にする …
-
-
日付時刻:数値から日付・時刻データを取得( DateSerial 関数、TimeSerial 関数 )
DateSerial 関数(数値を使って日付データを取得) 【書式】 date …
-
-
変数のデータ型・宣言(Dim ステートメント)
変数の宣言 一般的な方法 【書式】 Dim varname [ As type, …
-
-
文字列:指定した文字の文字コードを取得する(Asc 関数)
Asc 関数 【書式】 result = Asc ( string ) 引数・戻 …
-
-
文字列:指定した数の空白(スペース)からなる文字列を返す(Space 関数)
Space 関数 【書式】 result = Space ( number ) …
-
-
xlFileFormat 列挙型
xlFileFormat 列挙型 Workbook.SaveAs メソッド の引 …
-
-
指定した数値を文字列に変換する(Str 関数)
Str 関数 の使い方 Str 関数は、数値・数式を文字列に変換して返す関数です …
