Recherche presence de valeur d'une colonne sur une autre

bonjour,

un truc bete comme chou j'imagine mais je ne comprends pas pourquoi il ne fonctionne pas

dans la colonne B mes valeurs cibles

dans la colonne C mes valeurs recherchées

dans la colonne D il devrait m'afficher OK si la valeur dans C existes dans B

Help please

Bonjour

Une solution avec le fonction FIND :

Sub cherche()
Dim i
On Error Resume Next
For i = 2 To Cells(Rows.Count, "C").End(xlUp).Row
Set adresse = [B:B].Find(What:=Cells(i, "C"), LookAt:=xlPart)
If Not (adresse Is Nothing) Then Cells(i, "D") = "OK"
Next

End Sub

fred

ok merci cela marche nickel

Re

dans ce cas

merci fred