For Each Collection (gb)
Dim hCollection
As Collection
Dim aVariant
As Variant
For Each aVariant
In hCollection
...
Next
Enumera cada valor de los guardados en una colección.
Nótese que los elementos se enumeran en el orden en se insertaron. Pero si se cambia el valor de un elemento insertado se mantiene el orden.