OVH Cloud OVH Cloud

Userform renseignement

3 réponses
Avatar
F
Un grand bonjour à toutes et à tous,
Voilà ce qui m'amène à demander votre aide.
Dans un tableau (table), j'ai 2 colonnes, la première contient des noms
et la 2nde des performances.
A partir d'un userform1 je souhaite pouvoir à partir d'une combobox1
(qui contient les noms de la colonne A) appeler en parallèle dans une
textbox1 la performance (colonne B)de l'individu selectionné.
Je dois pouvoir entrer la performance à partir de la table (saisie à
risque)ou bien à partir de la textbox ( saisie limitant les maladresses).
Merci pour votre aide ;o)

3 réponses

Avatar
isabelle
bonjour ,

en une seule ligne,

textbox1.value = Application.Index(Sheets("Feuil1").Range("B:B"), _
Application.Match(combobox1.value), _
Sheets("Feuil1").Range("A:A"), 0))

isabelle


Un grand bonjour à toutes et à tous,
Voilà ce qui m'amène à demander votre aide.
Dans un tableau (table), j'ai 2 colonnes, la première contient des noms
et la 2nde des performances.
A partir d'un userform1 je souhaite pouvoir à partir d'une combobox1
(qui contient les noms de la colonne A) appeler en parallèle dans une
textbox1 la performance (colonne B)de l'individu selectionné.
Je dois pouvoir entrer la performance à partir de la table (saisie à
risque)ou bien à partir de la textbox ( saisie limitant les maladresses).
Merci pour votre aide ;o)



Avatar
papou
Bonjour
Pour récupérer la valeur correspondant à la valeur de la combo, utilise la
propriété ListIndex que tu devras incrémenter.
En effet, cette valeur commence à -1 (pour aucune valeur sélectionnée).
Donc quelque chose comme ça à placer dans l'évènement Change de la Combo par
exemple :
Private Sub ComboBox1_Change()
Me.TextBox1 = Feuil2.Cells(Me.ComboBox1.ListIndex + 2, 2)
End Sub
NB : Ici on considère une ligne d'en-tête et des valeurs situées en colonne
A et B, et de plus il n'y a aucun test pour la présence d'une valeur il faut
donc que tu en intègres un !

En ce qui concerne la saisie de la valeur dans la Textbox, il faut quand
même effectuer le contrôle de ce qui est attendu en plus du contrôle de la
présence d'un élément sélectionné dans la Combo.
Bon courage
Cordialement
Pascal

"" a écrit dans le message de news:

Un grand bonjour à toutes et à tous,
Voilà ce qui m'amène à demander votre aide.
Dans un tableau (table), j'ai 2 colonnes, la première contient des noms et
la 2nde des performances.
A partir d'un userform1 je souhaite pouvoir à partir d'une combobox1 (qui
contient les noms de la colonne A) appeler en parallèle dans une textbox1
la performance (colonne B)de l'individu selectionné.
Je dois pouvoir entrer la performance à partir de la table (saisie à
risque)ou bien à partir de la textbox ( saisie limitant les maladresses).
Merci pour votre aide ;o)



Avatar
F
Bonjour isabelle,
Ton code me renvoi "erreur de compilation et erreur de syntaxe"???
J'ai eu aussi un "attendu fin d'instruction" à la frappe de la dernière
paranthèse. J'attends ton secours.
.....Vive les filles

isabelle a écrit:
bonjour ,

en une seule ligne,

textbox1.value = Application.Index(Sheets("Feuil1").Range("B:B"), _
Application.Match(combobox1.value), _
Sheets("Feuil1").Range("A:A"), 0))

isabelle


Un grand bonjour à toutes et à tous,
Voilà ce qui m'amène à demander votre aide.
Dans un tableau (table), j'ai 2 colonnes, la première contient des
noms et la 2nde des performances.
A partir d'un userform1 je souhaite pouvoir à partir d'une combobox1
(qui contient les noms de la colonne A) appeler en parallèle dans une
textbox1 la performance (colonne B)de l'individu selectionné.
Je dois pouvoir entrer la performance à partir de la table (saisie à
risque)ou bien à partir de la textbox ( saisie limitant les maladresses).
Merci pour votre aide ;o)