pb list avec listbox

Bonjour le forum,

Après maintes et maintes recherches sur les différents fils, je n'arrive pas à trouver réponse à mon problème :

J'ai un listxox nommé ligncom multicolonnes dans lequel je voudrais vérifier une valeur :

dim s as single
For s = 0 To ligncom.ListCount
If ligncom.List(s, 1) = Achats.ref.Value Then
...
end if

le message 'Index de table de propriétés non valide' s'affiche.

Comment faire ?

Merci d'avance