Bonjour,
Je ne sais pas si cela va t'aider mais voici une function que j'utilise à l'occasion :
Function ChercheData(Eqt As Variant, Tablo As Range, Column As Integer)
ChercheData = Application.WorksheetFunction.Application.VLookup(Eqt, Tablo, Column, False)
End Function
à placer dans un module et à adapter selon tes besoins,
et je ne sais plus qui il faut remercier mais le coeur y est.
Celeda