Discussion :

[louis-25]

Bonjour,

Je voudrais savoir si il est possible de transférer le contenu d'un Textbox vers une Combobox puis en fonction du choix de la combobox remplir un label?

Je m'explique :

Dans un userform je renseigne le nom dans une première textbox et le prénom dans une deuxième.

Je voudrais que ces données s'ajoutent dans une combobox située sur un autre userform. Puis que lorsqu'on clique sur le nom dans la combobox les données relatives s'affichent dans un label situé dessous.

Je me doute qu'il faut utiliser la fonction add.item pour ajouter les données à la combobox mais je ne vois pas si cette commande doit se situer sur le userform où je rentre le nom et le prénom ou bien sur le userform où se situe la combobox ?

De plus une fois la combobox mise à jour automatiquement, comment faire pour que lorsque je choisisse un client le label se remplisse en fonction?


Merci d'avance

[Daniel.C]

Bonjour,

J'ai mis un bouton sur Userform1 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub CommandButton1_Click()
    If Me.TextBox1.Text <> "" And Me.TextBox2.Text <> "" Then
        Load UserForm2
        UserForm2.ComboBox1.AddItem Me.TextBox1.Text & " " & Me.TextBox2.Text
    End If
End Sub

et dans le code du second userform :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub ComboBox1_Click()
    Me.Label1.Caption = Me.ComboBox1.Value
End Sub

[louis-25]

Bonjour,

Tout d'abord merci de m'avoir répondu aussi vite!

Ensuite je voudrais avoir quelques précisions pour bien comprendre le mécanisme :

• Mon userform1 se présente sous la forme de trois textbox : nom, prenom,adresse. Lorsque je clique sur "Valider" c'est à ce moment que toutes les opérations se font, puis-je donc utiliser votre code à ce moment là ou dois-je créer un nouveau bouton?

• Je ne comprends le préfixe "Me." avant chaque dénomination d'objet?

Cordialement,

Louis

[Daniel.C]

Bonjour,

Qu'est-ce que tu entends pa "Valider" ? Est-ce un bouton ? Si tu ne dispose que de trois textboxes, quand vas-tu exécuter le code que j'ai mis dans :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub CommandButton1_Click()

?
Bien sûr si tu as un bouton "Valider",il faut mettre le code dedans.

"Me" désigne ici l'userform. Ce n'est pas obligatoire de le mettre. C'est une simple commodité :
si tu entres "Me.T", l'éditeur VB t'affiche les propriété et les objets de l'userform commençant par "T" et donc tu trouves les textboxes dans la liste; tu choisis celui que tu veux sans avoir à entrer son nom.

[louis-25]

Ah d'accord je comprends mieux maintenant!
Tout marche, je suis enfin sorti de ce problème.

Merci beaucoup!