VBA EXCEL - Adresse d'une cellule

Re : VBA EXCEL - Adresse d'une cellule

bonjour

essaies

Set c = Range("B4😀13").Find(What:=CDec(code),Lookat:=xlwhole)
toto=c.address

Re : VBA EXCEL - Adresse d'une cellule

Merci Pascal,

Tu viens de me mettre sur la bonne piste, il convenait de changer un peu ton code qui donnait l'adresse de la valeur recherchée et non l'adresse de la valeur trouvée.
voilà le code pour afficher l'adresse d'une valeur trouvée:

Private Sub CommandButton1_Click()

Sheets("ent").Select
c = Application.WorksheetFunction.VLookup(CDec(code), Range("b4:d13"), 2, False)
Set c = Range("B4😀13").Find(What:=c, Lookat:=xlWhole)
toto = c.Address

MsgBox toto

End Sub

🙂🙂😉 MERCI PASCAL