tem como usar referencia para atribuir uma variavel, array, coleção ou dicionario
em uma coleção ou dicionario em vez de valor ?
algo como isso:

var1="A"
coleção.add var1
msgbox coleção.(1) "resultado=A"
var1="b"
msgbox coleção.(1) "resultado=b"
ou
coleção.(1)="c"
msgbox var1 "resultado=c"
[/list:u:2rtmzpa0]

mas sem ter que coleção.add var1 no meio do caminho

estou pesquisando e fazendo testes,
mas como meu conhecimento é limitado nas propriedades de cada um ainda estou em duvida se é possivel ou não

Dim c As New Collection
Dim a(1 To 5) As Variant
Sub fhgdg()


c.Add "a", "a"
c.Add "b", "b"
a(1) = 5
a(2) = Array(2, 3, 4)
Set a(3) = c
a(4) = "abcd"
a(5) = Range("A1:A4").Value
End Sub

Sub tesg()
'MsgBox a(5)(1, 1)
'MsgBox a(2)(1)
'MsgBox a(3)(2)
'c.Add a
MsgBox c(3)(4)
a(4) = "mudou"
MsgBox c(3)(4)
MsgBox c(3)(5)(1, 1)
End Sub

claro que poderia fazer uma macro para refazer as referencias e valores
mas isso fugiria do meu proposito