Collection[…] = … (gb)

Dim hCollection As Collection
Dim aVariant As Variant
hCollection [ Key As String ] = aVariant

Associa um valor com Key.

Se o valor é NULL, então o valor atual associado à Key é removido da coleção se ele existir.