【VBA/マクロ】For Each文で配列要素を順に取り出す

ExcelのVBA(マクロ)で、For Each文で配列要素を順に取り出す方法についてまとめました。

For Each文

For Each文は、配列に対して同じ処理を繰り返すことができます。
よく使うのは、「配列の各要素を順に取り出す」場面です。

For Each 変数 In 配列
    処理
Next

上記がFor Each文の基本的な書式です。
Forが1回実行される毎に「配列」の要素が順に変数に格納されていきます。

サンプルコード

サンプルプログラムのソースコードです。

Sub test()

    '変数を宣言
    Dim member As Variant
    Dim name As Variant

    '配列に3つの要素をまとめて代入
    member = Array("アベンジャー", "バゼット", "カレン")

    For Each name In member

        MsgBox name

    Next

End Sub

メッセージボックスに配列要素が1つずつ表示されていきます。

関連ページ

【VBA入門】基礎から作業自動化の応用例まで解説
VBA(マクロ)で様々な処理を自動化する方法をサンプルコード付きで入門者向けにまとめました。

コメント