Originariamente inviato da MdE2005
Ci sono 2 errori:


Non ci vogliono le parentesi:
codice:
c.add 10, "pippo"

Probabilmente un errore di distrazione:
codice:
text1.text = c.item(a)
Solo per precisione..

Ciao a tutti..
grazie!... effettivamente .. avevo sonno.. volevo giusto rispondere a Stefano per correttezza. Comunque, in definitiva.. ecco il codice completo, giusto per chi vuole fare copia/incolla:

Dim a As String
Dim a2 As New Collection
Dim chiave As String

chiave = "a"

a2.Add "fabio", "a"


Debug.Print a2(chiave)

'stampa "fabio" nella finestra immediata di debug

Ciao e grazie a tutti.