OVH Cloud OVH Cloud

Recherche dans source de données

3 réponses
Avatar
Furion
Bonsoir à tous !

Après un week end à me creuser le crâne je dois encore me tourner vers vous
pour un petit peu d'aide. Désolé ! :-)

J'ai une source de données avec une colonne "références client" et une
colonne "nom du client".

Quelle procédure dois je utiliser pour renvoyer le nom du client dans un
label lorsque l'utilisateur saisi la référence dans un textbox.

Ma source de données doit comporter environ trois cents enregistrements et
je cherche la procédure la plus rapide. Mon userform et ma source de données
sont dans deux fichiers différents.

Voilà j'espère que je me suis pas trop mal exprimé et merci d'avance à ceux
qui pourront m'aider.

Bonne fin de week end à tous ! @+

3 réponses

Avatar
Daniel
Bonjour.
Le code suivant fonctionne si les deux classeurs sont ouverts (Classeur2
contient les données) :

Private Sub CommandButton1_Click()
MsgBox Application.VLookup(CInt(TextBox1.Value),
Range("[Classeur1]Feuil1!A1:B10"), 2, False)
End Sub

Cordialement.
Daniel
"Furion" a écrit dans le message de news:

Bonsoir à tous !

Après un week end à me creuser le crâne je dois encore me tourner vers
vous
pour un petit peu d'aide. Désolé ! :-)

J'ai une source de données avec une colonne "références client" et une
colonne "nom du client".

Quelle procédure dois je utiliser pour renvoyer le nom du client dans un
label lorsque l'utilisateur saisi la référence dans un textbox.

Ma source de données doit comporter environ trois cents enregistrements et
je cherche la procédure la plus rapide. Mon userform et ma source de
données
sont dans deux fichiers différents.

Voilà j'espère que je me suis pas trop mal exprimé et merci d'avance à
ceux
qui pourront m'aider.

Bonne fin de week end à tous ! @+


Avatar
Furion
Merci pour la formule Daniel !

2ème fois que tu m'aides et que tu me faire gagner un temps précieux.

Cependant je voudrai une ou deux précisions stp.
1) Y a-t-il une formule qui fonctionne même quand le fichier source est
fermé. (Mon 2ème fichier est une synthèse de plusieurs fichier et je voudrais
pas avoir à ouvrir 10 autres fichiers en fond) ?
2) A quoi sert cette fonction Cint() ?


Encore un grand merci pour ton aide !


Bonjour.
Le code suivant fonctionne si les deux classeurs sont ouverts (Classeur2
contient les données) :

Private Sub CommandButton1_Click()
MsgBox Application.VLookup(CInt(TextBox1.Value),
Range("[Classeur1]Feuil1!A1:B10"), 2, False)
End Sub

Cordialement.
Daniel
"Furion" a écrit dans le message de news:

Bonsoir à tous !

Après un week end à me creuser le crâne je dois encore me tourner vers
vous
pour un petit peu d'aide. Désolé ! :-)

J'ai une source de données avec une colonne "références client" et une
colonne "nom du client".

Quelle procédure dois je utiliser pour renvoyer le nom du client dans un
label lorsque l'utilisateur saisi la référence dans un textbox.

Ma source de données doit comporter environ trois cents enregistrements et
je cherche la procédure la plus rapide. Mon userform et ma source de
données
sont dans deux fichiers différents.

Voilà j'espère que je me suis pas trop mal exprimé et merci d'avance à
ceux
qui pourront m'aider.

Bonne fin de week end à tous ! @+







Avatar
Daniel
1. Non. J'ai oublié de le préciser, le fichier contenant les sources de
données doit être ouvert.
2. le CInt est dû à ma procédure de test. Si tes références sont numériques,
CInt convertit la valeur du Textbox en numérique (elle est en format texte
par défaut).
Cordialement.
Daniel
"Furion" a écrit dans le message de news:

Merci pour la formule Daniel !

2ème fois que tu m'aides et que tu me faire gagner un temps précieux.

Cependant je voudrai une ou deux précisions stp.
1) Y a-t-il une formule qui fonctionne même quand le fichier source est
fermé. (Mon 2ème fichier est une synthèse de plusieurs fichier et je
voudrais
pas avoir à ouvrir 10 autres fichiers en fond) ?
2) A quoi sert cette fonction Cint() ?


Encore un grand merci pour ton aide !


Bonjour.
Le code suivant fonctionne si les deux classeurs sont ouverts (Classeur2
contient les données) :

Private Sub CommandButton1_Click()
MsgBox Application.VLookup(CInt(TextBox1.Value),
Range("[Classeur1]Feuil1!A1:B10"), 2, False)
End Sub

Cordialement.
Daniel
"Furion" a écrit dans le message de
news:

Bonsoir à tous !

Après un week end à me creuser le crâne je dois encore me tourner vers
vous
pour un petit peu d'aide. Désolé ! :-)

J'ai une source de données avec une colonne "références client" et une
colonne "nom du client".

Quelle procédure dois je utiliser pour renvoyer le nom du client dans
un
label lorsque l'utilisateur saisi la référence dans un textbox.

Ma source de données doit comporter environ trois cents enregistrements
et
je cherche la procédure la plus rapide. Mon userform et ma source de
données
sont dans deux fichiers différents.

Voilà j'espère que je me suis pas trop mal exprimé et merci d'avance à
ceux
qui pourront m'aider.

Bonne fin de week end à tous ! @+