VLookUp VBA avec le critere de recherche en variable

Version imprimable

Bonjours à tous,

Voila j'ai une feuille excel avec dedans une colone pour des ID unique une autre avec des noms,

Depuis un userform je voudrait depuis une liste déroulante choisir un nom de la liste et récupérer l' ID de cette même ligne.

Donc actuellement j'ai mon userform, j'ai ma liste déroulante avec mes nom ( de la colonne B), mais impossible de récuprer l'ID de la colone A...
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Private Sub LDClients_Change() With Sheets("Clients") Dim NomSelectioner As Variant Dim IDClientsSelectioner As Variant NomSelectioner = UserForm1.LDClients 'Récuprer nom client 'IDClientsSelectioner = WorksheetFunction.VLookup(.Range("A2").Value, Sheets("Clients").Range("A1:C100"), 1, False) IDClientsSelectioner = WorksheetFunction.VLookup(NomSelectioner, Sheets("Clients").Range("A1:B100"), 1, False) UserForm1.LBIDClientsSelectioner.Caption = IDClientsSelectioner End With End Sub
si j'utilise la première commande qui est en commentaire, cela fonctionne,

si je rentre le critère rechercher comme ceci cela ne fonctionne pas:

Code:

IDClientsSelectioner = WorksheetFunction.VLookup("Toto", Sheets("Clients").Range("A1:B100"), 1, False)

et si j'utilise ma variable NomSelectioner cela ne fonctionne pas non plus, si je contrôle le contenue de ma variable NomSelectioner elle contient bien "Toto"

Pourriez vous m'éclairer a ce sujet??

Merci d'avance

06/09/2018, 15h27
Daniel.C

Bonjour,

Essaie :

Code:

NomSelectioner = UserForm1.LDClients.Value

Fais attention de ne pas comparer du texte avec des nombres.
06/09/2018, 15h44
der43e

Bonjour et merci beaucoup pour la piste,

cependant j'ai toujours l'erreur 1004,

en contrôlent ma variable j'ai bien "Toto" dedans

pour ce qui est de la comparaisons j'ai mis mes variable en Variant et dans la colonne Nom il n'y a que des nom et dans la colone ID que des chiffres!

Avez vous une autre idées? je cherche un peut partout mais je ne trouve rien de concluent!

c'est comme si ce que je mettait dans ma variable ou meme juste le texte Brut avec :

Code:

IDClientsSelectioner = WorksheetFunction.VLookup("Toto", Sheets("Clients").Range("A1:B100"), 2, False)

n’étais pas bien reconnu...

EDIT:

Juste pour être sur ma feuille est la suivante:
A B
1 Toto
2 Titi
3 Bobo

Est ce que c'est cela qui ne m,arche pas? j'ai vraiment du mal a comprendre, surtout que si je fair avec l'endroit de recherche du type WorksheetFunction.VLookup(.Range("A2").Value, cela fonctionne...
06/09/2018, 16h04
Daniel.C

Tu dois inverser tes colonnes ?
06/09/2018, 16h09
der43e

Mon dieu... c’était bien sa...

je vient de perdre deux heure de ma vie ... :mouarf:

Merci infiniment!

Mais existe il la possibilité de faire une recherche sur la Gauche?
06/09/2018, 16h11
Philippe Tulliez

Bonjour,

Citation:

Donc actuellement j'ai mon userform, j'ai ma liste déroulante avec mes nom ( de la colonne B), mais impossible de récuprer l'ID de la colone A...

D'après ta question, il est normal que cela ne fonctionne pas.
VLookup (RechercheV), fait une recherche sur la première colonne de la plage de données et peut renvoyer la valeur se trouvant dans la colonne de recherche ou les suivantes mais pas les précédentes.
Solution : Utiliser INDEX et MATCH (Equiv)

Cependant si la liste déroulante affiche tous les éléments de la liste des données, il n'y a aucune raison d'utiliser une fonction de recherche puisque la propriété ListIndex du ComboBox indique la ligne sélectionnée.
Un simple Range("A" & ComboBox1.ListIndex + 1).Value ou Cells(ComboBox1.ListIndex+1, 1).Value suffira