Конструкція оператора For Each мови vba.

Якщо оператор With використовується для виконання декількох дій для одного об’єкта, то оператор For Each використовується для виконання одного і того ж набору дій для декількох об’єктів. Оператор For Each, як правило, використовувати для перегляду елементів масиву або колекції.

Оператор For Each має наступний формат:

For Each елемент In колекція(масив)

....Next елемент

Елемент – це ідентифікатор змінної-інтерпретатора; колекція – ідентифікатор колекції або масиву.

У коді процедури Колекції переглядаються аркуші активної книги і на екран по черзі виводиться № аркуша та його ім’я.

Приклад використання оператора For Each.

Public Sub Колекції()

Dim Аркуш As Worksheet

Dim Nomer As Integer

Nomer = 0

For Each Аркуш In ActiveWorkbook.Worksheets

Nomer = Nomer + 1

MsgBox ("Ім’я аркуша: ") & Nomer & " " & Аркуш.Name

Next Аркуш

End Sub