Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

データ型を調べてそのデータ型を示す文字列を返す（TypeName 関数）

2015/05/17 2015/08/26

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ソース

　
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

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

　

実行結果

- VBA基本 TypeName 関数, VBA基本, エクセルVBA, データ型, 型名

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

Replace 関数の使い方【書式】 result = Replace ( s …

: 式を評価し、結果（真・偽）に応じた式・値を返す（IIf 関数）

IIf 関数の使い方 IIf（アイイフ）関数は、式を評価してその結果（真・偽） …

: 変数が配列かどうかをチェックする（ IsArray 関数）

IsArray 関数の使い方【書式】 result = IsArray( va …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: 文字列：２つの文字列を比較する（StrComp 関数）

StrComp 関数の使い方【書式】 result = StrComp ( s …

: VBA の演算子（算術演算子）

算術演算子算術演算を行うときに使用する演算子です。 ^（べき乗）、*（積）、/ …

: VBA の演算子（文字連結演算子：& 演算子 + 演算子）

文字連結演算子文字連結演算子は、文字列の連結を行うときに使用する演算子で、「& …

: 変数がEmpty 値かどうかをチェックする（ IsEmpty 関数）

IsEmpty 関数の使い方【書式】 result = IsEmpty ( e …

: VBAの変数宣言

VBAの変数宣言について変数を暗黙的に宣言するエクセル VBA の場合、明示 …

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

PREV: 指定した数値を文字列に変換する（Str 関数）
NEXT: データ型を調べて、そのデータ型を示す数値を返す（VarType 関数）