XL 2013 Déterminer la ligne à partir d'une valeur

[vinciHorus]

Bonjour

j'ai le tableau suivant :

A	B
papaye	cerise

J'aimerais que grâce à PAPAYE, mon code détermine que c'est la ligne 1 de la colonne A

Merci

 

[Dudu2]

Bonjour,

Dim c As Range
Set c = ActiveSheet.Cells.Find("papaye", LookIn:=xlValues)
MsgBox "Ligne " & c.Row & ", colonne " & c.Column