TypeName 関数 の使い方
TypeName 関数は、引数に、データ型を調べたい値や変数を指定するとそのデータ型を示す文字列を返します。
【書式】
result = TypeName ( varname )
引数・戻り値
- varname ・・・ 調べたい値や変数を指定します。
- result ・・・ 引数 varname のデータ型を表す文字列
（戻り値は、以下「TypeName 関数の戻り値一覧」を参照）。
TypeName 関数の戻り値一覧
| 戻り値 | 内容 |
| Byte | バイト型（Byte） |
| Integer | 整数型（Integer） |
| Long | 長整数型（Long） |
| Single | 単精度浮動小数点数型（Single） |
| Double | 倍精度浮動小数点数型（Double） |
| Currency | 通貨型（Currency） |
| Decimal | 10 進数型 |
| Date | 日付型（Date） |
| String | 文字列型（String） |
| Boolean | ブール型（Boolean） |
| Error | エラー値 |
| Empty | 未初期化 |
| Null | 無効な値 |
| Object | オブジェクト |
| Unknown | オブジェクトの種類が不明なオブジェクト |
| Nothing | オブジェクトを参照していないオブジェクト変数 |
引数 varname が、バリアント型変数の場合は、内部処理形式を識別する文字列を返します。
引数 varname が配列の場合は、上記の文字列の中の該当する文字列またはバリアント型（Variant）の値に、空のかっこ “()” を付けて返します。
（例）引数 varname が整数の配列のとき、TypeName 関数は “Integer()” を返します。
TypeName 関数 の使用例
サンプル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_typename() Dim myStr As String, myInt As Integer, myLng As Long Dim myDbl As Double, mySgl As Single, myBol As Boolean Dim myObj As Object, myDat As Date, myCur As Currency Dim myByt As Byte, myWks As Worksheet Dim myVal1, myVal2, myEmp, myNull Set myWks = ActiveSheet myVal1 = 123 myVal2 = CDec(12500) myNull = Null Debug.Print TypeName(myStr) Debug.Print TypeName(myInt) Debug.Print TypeName(myLng) Debug.Print TypeName(myDbl) Debug.Print TypeName(mySgl) Debug.Print TypeName(myBol) Debug.Print TypeName(myObj) Debug.Print TypeName(myDat) Debug.Print TypeName(myCur) Debug.Print TypeName(myByt) Debug.Print TypeName(myWks) Debug.Print TypeName(myVal1) Debug.Print TypeName(myVal2) Debug.Print TypeName(myEmp) Debug.Print TypeName(myNull) End Sub |
実行結果
