For Each 要素 in 配列 処理 Next 要素
要素 | 配列(またはコレクション)の個々の値を格納する変数 |
配列 | 配列またはコレクション |
Option Explicit
Sub main()
Dim names(0 To 3) As String
Dim name As Variant
names(0) = "エクセル"
names(1) = "ワード"
names(2) = "パワーポイント"
names(3) = "アクセス"
For Each name In names
Debug.Print (name)
Next name
'実行後、イミディエイト ウインドウに
'以下の出力があります
'
'エクセル
'ワード
'パワーポイント
'アクセス
End Sub
このサイトはリンクフリーです。リンクを貼る際に連絡は不要です。
© EXCEL VBA リファレンス all rights reserved.