Iterating Through the Elements of a Custom Collection: use the For...Each loop to iterate through the items in a collection : Collection « Data Type « VBA / Excel / Access / Word






Iterating Through the Elements of a Custom Collection: use the For...Each loop to iterate through the items in a collection

 
Sub IterateCollection()
    Dim colNames As Collection

    Dim varItem As Variant

    Set colNames = New Collection

    colNames.Add "A", "A"
    colNames.Add "Dan", "Dan"
    colNames.Add "Al", "Ale"
    colNames.Add "B", "Bren"
    colNames.Add "S", "Son"
    colNames.Add "Sue", "Su"

    For Each varItem In colNames
        Debug.Print varItem
    Next varItem
End Sub

 








Related examples in the same category

1.Create collection
2.Removing Objects from a Collection
3.Creating and Working with Custom Collections
4.Accessing an Item in a Custom Collection
5.Item method is the default method of the Collection object
6.Refer to an item in a collection using its unique key
7.Removing Items from a Custom Collection
8.Remove element with the key
9.Remove all the elements of a collection in two ways:
10.Adding Items to a Custom Collection
11.Looping Through the Elements of a Custom Collection
12.Referencing Items in a Custom Collection
13.Using a Collection to Manipulate Multiple Instances of the FileInformation Class