Si tu veux le faire sous forme de Macro, voila une solution qui marche je pense.
Tout dabord tu fais comme tu voulais, c'est a dire que tu tape par ex dans la colonne A le nom de tes feuilles où tu veux faire ta rechercheV.
Tu place ton curseur sur la 1ere cellule (A1 par ex)et tu lance ta macro:
Sub Macro1()
Dim i As String
i = ActiveCell
Dim compteurRapide As Variant
compteurRapide = 0 'initialise la variable compteurRapide a 0
For compteurRapide = 0 To 1000 'pour aller juska la ligne 1000
ActiveCell.FormulaR1C1 = '=VLOOKUP(RC[-1],' & i & '!R10C1:R20C2,5,False)'
ActiveCell.Offset(rowOffset:=1, columnOffset:=0).Activate
Next compteurRapide
End Sub