???
Heeeee une collection n'a pas de clef ???
Si je fait :
'8<----------------------------------------------------
Public Sub Toto()
Dim MeCollection As Collection = New Collection()
MeCollection.Add("La valeur", "La clef")
MsgBox(MeCollection.Item("La clef"))
End Sub
'---------------------------------------------------->8
J'ai bien un message box m'affichant "La valeur".
D'ayeur la définition du Add dans une collection es :
'8<----------------------------------------------------
PublicSubAdd ( _
ItemAsObject, _
<OptionalAttribute> OptionalKeyAsString = Nothing, _
<OptionalAttribute> OptionalBeforeAsObject = Nothing, _
<OptionalAttribute> OptionalAfterAsObject = Nothing _
)
'---------------------------------------------------->8
Source MSDN
Amicalement 
Pensez "Réponse acceptée"