Базовый подход:
Объявление объекта коллекции
Dim oCol As Collection
Создание экземпляра объекта
Set oCol = New Collection
Добавление объектов в коллекцию
oCol.Add Item:=1, Key:="Item1IsANumber"
oCol.Add Item:="SomeString", Key:="Item2IsAString"
См. Пункты
z = oCol.Item(1) ' z = 1
z = oCol.Item(2) ' z = "SomeString"
z = oCol.Item("Item1IsANumber") ' z = 1
z = oCol.Item("Item2IsAString") ' z = "SomeString"
CPearson.com
- хороший справочник для многих вещей vba
Вот Ссылка на страницу коллекций