VBAのIE制御

こちらでは、VBAのIE(InternetExplorer)操作に利用されたTypeステートメントの解説になります。

ステートメントとは、「命令文」と訳されるように、コンピュータに具体的な動作を指定する最小単位のプログラムです。主にマクロの挙動を制御する構文や文法を指します。通常は１行で完結する部分を指しますが、If～Thenなど複数行にまたがる部分を意味することもあります。

目次

• Typeステートメントとは
• Typeステートメントのサンプルコード
  • 実行結果
  • 解説

Typeステートメントとは

Typeステートメントは、1 つまたは複数の要素を持つユーザー定義のデータ型 (ユーザー定義型) を宣言します。モジュール レベルで使います。

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

Type ステートメントは、モジュール レベルでのみ使用できます。Type ステートメントでユーザー定義型を宣言すると、その宣言の適用範囲内であれば、どこからでもその型の変数を宣言できるようになります。ユーザー定義型の変数の宣言には、Dim、Private、Public、ReDim、または Static のいずれかのステートメントを使います。

標準モジュールでは、ユーザー定義型は既定でパブリックになり、その適用範囲はキーワード Public で変更できます。クラス モジュールでは、ユーザー定義型は常にプライベートになり、適用範囲はキーワード Public では変更できません。

Type...End Type ブロック内では、行番号と行ラベルは使えません。

ユーザー定義型は、データ型の異なる多数の関連する要素で構成されるデータ レコードでよく使われます。次の例は、ユーザー定義型の中に固定サイズの配列を含めたものです。

Type StateData
CityCode (1 To 100) As Integer ' サイズ固定型 (静的) 配列を宣言します。
County As String * 30
End Type

Dim Washington(1 To 100) As StateData

この例では、StateData には固定サイズの配列 CityCode が含まれており、レコード Washington は StateData と同じ構造になっています。

ユーザー定義型の中で固定サイズの配列を宣言する場合は、変数ではなく数値リテラルまたは数値定数を使って、次元を宣言する必要があります。

Typeステートメントのサンプルコード

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

※ドラッグ(スワイプ)すると全体を確認できます。

実行結果

解説

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