Je souhaites trouver toutes les valeurs que le Vlookup trouve, ci joint un exemple trouver sur le forum mais je souhaite le faire avec une macro, si posible.
Je vais encore vous déranger un peu :
Est-il possible de noter cette formule dans Visual Basic ?
Si je lance la macro, elle me renvoie la liste dans une colonne.
Bonjour Nono, Rachid,
Voici une macro à mettre dans un module et à lancer
Bruno
Code:
Sub test()
Dim x%, k%
[D:D].ClearContents
x = InputBox("Indiquez le nom")
If Not IsNumeric(x) Then Exit Sub
[D1] = x: lig = 2
For k = 1 To [A65536].End(3).Row
If x = Cells(k, 1) Then Cells(lig, 4) = Cells(k, 2): lig = lig + 1
Next
End Sub