Magic_Doctor
XLDnaute Barbatruc
VB:
Function NumLigne%(recherche As Variant, plage As Range)
'Renvoie le Nº de la ligne de la plage "plage" où se trouve "recherche" dans cette plage (si pas trouvé --> 0)
'Si "recherche" est un chiffre (par ex 12,53) et que la plage soit, par ex, A1:A250 : NumLigne(12,53, A1:A250)
'Si "recherche" est du texte (par ex Romina) et que la plage soit, par ex, A1:A250 : NumLigne("Romina", A1:A250)
Dim x As Integer
On Error Resume Next
x = Application.Match(recherche, plage, 0)
On Error GoTo 0
NumLigne = x
End Function