For-Each-Schleifen durchlaufen vollständig die einzelnen Elemente einer Auflistungen (oder Zusammenfassung). Sie kennen bereits die folgende Prozedur aus der Datei Lösungen Excelobjekte.xlsm (33 kB).

Sub Tabellen()
Dim Tabelle As Worksheet
For Each Tabelle In Worksheets
MsgBox Tabelle.Name
Next
End Sub

Eine Zusammenfassung von Objekten - die Auflistung Worksheets - wird Objekt für Objekt (also elementweise) "durchlaufen", im Beispiel sind es alle vorhandenen Arbeitsblätter bzw. Tabellen. Eine einzelne Tabelle ist ein Worksheet. Für die Aufnahme der Elemente dieser Auflistung wird eine Objektvariable Tabelle des Typs Worksheet vereinbart.