Bonjour,
Voici une proposition avec une fonction personnalisée :
Function EQUIVX(Valeur, rTable As Range)
With rTable
For i = 1 To .Rows.Count
For k = 1 To .Columns.Count
If .Cells(i, k).Value Like Valeur Then EQUIVX = i: Exit Function
Next k
Next i
End With
EQUIVX = CVErr(xlErrNA)
End Function
à coller dans un module standard puis à utiliser ainsi sur feuille :
=INDEX(Table[Cours];EQUIVX($A$1;Table))
où Table[Cours] est la 1è colonne nommée Cours du tableau nommé Table et A1 contient la valeur à rechercher soit "Noa" dans l'exemple.
Cdlt,