エクセルVBAのユーザー定義型の宣言について

前回は、それぞれのデータ型の特徴を事例を交えて解説してきました。 データ型を間違えると予期せぬ結果をもたらすので、それぞれの特徴を理解した上で正しいデータ型で宣言するようにしましょう。 今回は、この基本的なデータ型以外にユーザーが自由に定義できる型の作成について解説していきます。

目次

• ユーザー定義型とは
• ユーザー定義型の使い方
• 関数を利用した変数の型変換
• まとめ

ユーザー定義型とは

ユーザー定義型とは、複数のデータ型を1つにまとめてユーザーが自由に定義できる型のことを言います。例えば整数型(Integer)は整数値のみ、文字列型(String)は文字列のみでほかの異なった値を格納することができません。それに対してユーザー定義型は、異なる型も共存させることができます。

ユーザー定義型は関連性があり、異なるデータ型が複数存在する場合にとても有効な方法です。例えば、顧客情報を管理する場合に顧客情報には名前や年齢、生年月日とこれだけでも3種類の異なったデータ型が混在します。もちろんそれぞれに変数を割り当てても問題ありませんが、ユーザー定義型として割り当てると簡単に管理することができます。

詳細については、事例で解説しますので、先にユーザー定義型の使い方について解説します。尚、ユーザー定義型を作成する場合は、Typeステートメントを利用します。

ユーザー定義型の使い方

ユーザー定義型を作成するには、Typeステートメントを利用して以下のように記述します。

Type ユーザー定義型名
　要素1(変数・定数名) As データ型
　要素2(変数・定数名) As データ型
End Type

Sub Sample()
　Dim 変数名 As ユーザー定義型名
　変数名.要素1 = 値
　変数名.要素2 = 値
End Sub

こちらの事例では、「名前」と「年齢」のユーザー定義型を作成しています。
ユーザー定義型名は「Personal」で、名前の変数Nameに文字列型(String)、年齢の変数Ageにバイト型(Byte)を設定しています。今回は2つだけの設定ですが、扱う要素が多くなればなるほど利便性が高くなります。

Type Personal
    Name As String
    Age As Byte
End Type

Sub sample()

    Dim perA As Personal
    
    perA.Name = "鈴木"
    perA.Age = 20
    
    MsgBox "名前：" & perA.Name & ", 年齢：" & perA.Age
    
End Sub

実行結果

関数を利用して変数の型変換

複雑なプログラムになるほど利用される変数や定数の数が比例します。また、それらは様々なプロシージャでデータのやり取りを行います。そのような時によくあるのが、変数のデータ型によるエラーです。

例えば、変数aを文字列として利用しているステートメントと数値として利用しているステートメントがあった場合、どちらかでエラーが発生する可能性があります。そのような場合に便利なのが型変換できる関数群です。

一度設定した型宣言は、型変換できるVBA関数を利用すれば簡単に変換することができます。整数型の変数に代入したい場合、文字列型の変数を整数型にすることもできます。他にも以下のようなVBA関数もありますので、一緒に覚えておきましょう。

まとめ

今回はユーザー定義型の作成と宣言について解説しました。また、一度設定した型宣言の変換についてもVBA関数を利用すれば変更できることが分かったかと思います。次回は変数が及ぼす影響の範囲について解説していきます。

よく読まれているVBAのIE(InternetExplorer)操作関連記事

• 指定したURLをIE(InternetExplorer)で起動する
• InternetExplorer制御の準備（ライブラリ追加）
• HTMLドキュメント(全ての要素)を取得する
• HTMLDocumentのallオブジェクト
• webページのBasic認証自動ログイン「ieBasic」