Re : Vlookup inversé.
Bonsour®
la combinaison magique INDEX/EQUIV !!!
plus souple que RECHERCHEx
en VBA :
Sub test_inv()
Dim cellule As Range, c As Range
For Each cellule In Range("A1:A10")
With Worksheets("sheet1").Range("Table2")
Set c = .Find(cellule.Value, LookIn:=xlValues)
If Not c Is Nothing Then
cellule.Offset(0, 2) = c.Offset(0, -2).Value
End If
End With
Next
End Sub