Recherche lookup plusieurs valeurs[Résolu]

nono159

XLDnaute Nouveau
Bonjour à tous,

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.

Merci pour votre aide.
 

Pièces jointes

  • Recherche multiple.xls
    22 KB · Affichages: 80
  • Recherche multiple.xls
    22 KB · Affichages: 88
  • Recherche multiple.xls
    22 KB · Affichages: 84
Dernière édition:

R@chid

XLDnaute Barbatruc
Re : Recherche lookup plusieurs valeurs

Bonsoir,
je voie que la formule utilisée n'est pas pratique, essayer D2 avec :
Code:
=SIERREUR(INDEX(B$1:B$12;PETITE.VALEUR(SI(A$1:A$12=D$1;LIGNE(A$1:A$12));LIGNES($2:2)));"")
@ valider par CTrl+Maj+Entree
@ tirer vers le bas
Amicalement
 

nono159

XLDnaute Nouveau
Re : Recherche lookup plusieurs valeurs

Bonjour Rachid, le forum,

Merci Rachid pour ta réponse :)

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.


Merci d'avance pour vos réponses.
 

youky(BJ)

XLDnaute Barbatruc
Re : Recherche lookup plusieurs valeurs

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
 

Discussions similaires

Statistiques des forums

Discussions
312 556
Messages
2 089 589
Membres
104 215
dernier inscrit
Jean Michl