データ型変換関数:Excel VBA関数 |
| スポンサードリンク | |
| 関数 | 戻り値のデータ型 |
| CBool | ブール型(Boolean) |
| CByte | バイト型(Byte) |
| CCur | 通貨型(Currency) |
| CDate | 日付型(Date) |
| CDbl | 倍精度浮動小数点実数型(Double) |
| CInt | 整数型(Integer) |
| CLng | 長整数型(Long) |
| CSng | 単精度浮動小数点実数型(Single) |
| CVar | バリアント型(Variant) |
| CStr | 文字列型(String) |
| Sub test() Range("D1").Value = Range("A1").Value & Range("B1").Value & Range("C1").Value Range("D2").Value = CDate(Range("A1").Value & Range("B1").Value & Range("C1").Value) End Sub |
| 返される文字列 | 変数の情報 |
| オブジェクトの種類 | 返された文字列 |
| 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 | オブジェクトを参照していないオブジェクト変数 |
| Sub test() Range("D1").Value = Range("A1").Value & Range("B1").Value & Range("C1").Value Range("D2").Value = CDate(Range("A1").Value & Range("B1").Value & Range("C1").Value) Range("E1").Value = TypeName(Range("D1").Value) Range("E2").Value = TypeName(Range("D2").Value) End Sub |
| 定数 | 値 | 内容 |
| vbEmpty | 0 | Empty 値 (未初期化) |
| vbNull | 1 | Null 値 (無効な値) |
| vbInteger | 2 | 整数型 |
| vbLong | 3 | 長整数型 (Long) |
| vbSingle | 4 | 単精度浮動小数点数型 (Single) |
| vbDouble | 5 | 倍精度浮動小数点数型 (Double) |
| vbCurrency | 6 | 通貨型 (Currency) |
| vbDate | 7 | 日付型 (Date) |
| vbString | 8 | 文字列型 |
| vbObject | 9 | オートメーション オブジェクト |
| vbError | 10 | エラー型 |
| vbBoolean | 11 | ブール型 (Boolean) |
| vbVariant | 12 | バリアント型 (Variant) (バリアント型配列にのみ使用) |
| vbDataObject | 13 | 非オートメーション オブジェクト |
| vbByte | 17 | バイト型 |
| vbArray | 8192 | 配列 (Array) |
| Sub test() Range("D1").Value = Range("A1").Value & Range("B1").Value & Range("C1").Value Range("D2").Value = CDate(Range("A1").Value & Range("B1").Value & Range("C1").Value) Range("E1").Value = VarType(Range("D1").Value) Range("E2").Value = VarType(Range("D2").Value) End Sub |
| Sub test2() Dim c As Range For Each c In Selection c.Offset(0, 1) = VarType(c) Next c End Sub |
| 関数名 | 内容 |
| IsArray | 変数が配列かどうかを調べる |
| IsDate | 値を日付型に変換可能かどうかを調べる |
| IsEmpty | 値がEmptyかどうかを調べる |
| IsError | 式がエラー値かどうかを調べる |
| IsMissing | プロシージャに省略可能なバリアント型 (Variant) の引数が渡されたかどうかを調べる |
| IsNull | 式にNull値が含まれているかを調べる |
| IsNumeric | 値を数値として評価できるかどうかを調べる |
| IsObject | 識別子がオブジェクトかどうかを調べる |
| Sub test() Range("D1").Value = Range("A1").Value & Range("B1").Value & Range("C1").Value Range("D2").Value = CDate(Range("A1").Value & Range("B1").Value & Range("C1").Value) Range("E1").Value = IsDate(Range("D1").Value) Range("E2").Value = IsDate(Range("D2").Value) End Sub |
| 表記 | 意味 | 型宣言文字 | データ範囲 |
| Byte | バイト型 | 0〜255 | |
| Boolean | ブール型 | TrueまたはFalse | |
| Integer | 整数型 | % | -32,768 〜 32,767 |
| Long | 長整数型 | & | -2,147,483,648 〜 2,147,483,647 |
| Currency | 通貨型 | @ | -922,337,203,685,477.5808〜 922,337,203,685,477.5807 |
| Single | 単精度浮動小数点型 | ! | -3.402823E38〜-1.401298E-45(負の値) 1.401298E-45〜3.402823E38(正の値) |
| Double | 倍精度浮動小数点型 | # | -1.79769313486232E308〜-4.94065645841247E-324(負の値) 4.94065645841247E-324〜1.79769313486232E308(正の値) |
| Date | 日付型 | 西暦1900年1月1日〜西暦9999年12月31日 | |
| String | 固定長文字列型 | $ | 0〜約64KB |
| 可変長文字列型 | 0〜2GB | ||
| Variant | バリアント型 | 数値(Double) 文字列(可変長文字列) |
|
| Object | オブジェクト型 | オブジェクトを参照する | |
| Decimal | 10進 |
スポンサードリンク
PageViewCounter
Since2006/2/27