Microsoft Office Tutorials and References
In Depth Information
6.5 For-Each-Schleife
Abbildung 6.6
Ergebnis der Funktion TypeName()
6.5
For-Each-Schleife
Die Schleife For Each ... In ... Next wird bei Auflistungen oder Daten-
feldern eingesetzt. In der Objekthierarchie von Excel gibt es zahlreiche
Auflistungen, z. B. Workbooks und Worksheets . Nachfolgend ein Beispiel
mit der Auflistung Workbooks , also der Liste aller geƶffneten Excel-
Dateien:
Auflistung
Sub ForEachWorkbook()
Dim WB As Workbook
Dim Ausgabe As String
Ausgabe = "Workbooks: "
For Each WB In Workbooks
Ausgabe = Ausgabe & WB.Name & " "
Next WB
MsgBox Ausgabe
End Sub
Das Ergebnis:
Abbildung 6.7
Liste der geƶffneten Workbooks
Search JabSto ::




Custom Search