لوپ For Each با آرایه

اول باید دو متغیر Arr و element را با Dim اعلان کنید

Arr(0)="123"

Arr(1)="456"

Arr(2)="789"

Arr(3)="012"

For Each element in Arr

Debug.Print element

Next