“La collection VBA contient” Réponses codées

La collection VBA contient

' Vba collection contains
Public Function ExistsInCollection(col As Collection, pKey As Variant) As Boolean
    On Error GoTo err
    ExistsInCollection = True
    IsObject (col.Item(pKey))
    Exit Function
err:
    ExistsInCollection = False
End Function