針對陣列或集合中的每個元素，重複一組陳述式。
語法
For Each element In group [statements] [Exit For] [statements] Next
引數：
element：用來重複整個集合或陣列中元素的變數。對於集合，元素只能是變異變數、一般物件變數或任何特定 Automation 物件變數。對於陣列，元素只能是變異變數。
group：物件集合或陣列的名稱。
statements：在群組中的每個項目上執行的一或多個陳述式。
備註
如果群組中至少有一個元素，則會輸入 For Each 區塊。輸入迴圈之後，就會針對群組中的第一個元素執行迴圈中的所有陳述式。如果群組中有更多元素，則會繼續針對每個元素執行迴圈中的陳述式。當群組中不再有元素時，迴圈就會結束，而執行會繼續進行 Next 陳述式之後的陳述式。
Exit For 只能在 For Each...Next 或 For...Next 控制項結構中使用，以提供另一種結束的方式。可以在迴圈中的任何位置放置任何數目的 Exit For 陳述式。Exit For 通常與某些條件 (例如 If...Then) 的評估搭配使用，並將控制項傳輸至緊接 Next 之後的陳述式。
您可以在另一個 For Each...Next 迴圈中放置一個 For Each...Next 迴圈，以巢狀方式執行此種迴圈。不過，每個迴圈元素都必須是唯一的。
Note:
如果您在 Next 陳述式中省略元素，執行會繼續執行，就像您已納入該元素一樣。如果 Next 陳述式在對應的 For 陳述式之前執行，則會發生錯誤。
下列範例說明 For Each...Next 陳述式的用法：
範例 1：
Dim fruits(2)
fruits(0) = "Apple"
fruits(1) = "Banana"
fruits(2) = "Cherry"
For Each fruit In fruits
' Variable fruit denotes each element in fruits array
Next