Combo et TxT

Le
Michel69
Bonjour à tous,

Comment en VBA, à partir du choix dans une combo (liste), je peux faire
afficher dans une txtbox une valeur correspondante ?
Ex : si je selectionne dans mon useform "Ouest" dans une combo (liste
rowsource) , je voudrais faire afficher dans la Txtbox suivante le critère
"Oui" et où placer ce bout de code ?

Merci d'avance
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel
Le #4905841
Bonjour.

Private Sub ComboBox1_Change()
Me.TextBox1.Value = Me.ComboBox1.Value
End Sub

Cordialement.
Daniel
"Michel69" news:
Bonjour à tous,

Comment en VBA, à partir du choix dans une combo (liste), je peux faire
afficher dans une txtbox une valeur correspondante ?
Ex : si je selectionne dans mon useform "Ouest" dans une combo (liste
rowsource) , je voudrais faire afficher dans la Txtbox suivante le critère
"Oui" et où placer ce bout de code ?

Merci d'avance


Michel69
Le #4905801
Merci Daniel pour ta réponse rapide mais si j'ai bien compris, dans ton code,
la textbox prend la valeur du choix fait dans la combo ?
En fait, ma question était : si je choisi le mot "Ouest" dans la combo,
comment faire afficher le mot "Oui" dans ma textbox et où mettre le code
Encore merci


Bonjour.

Private Sub ComboBox1_Change()
Me.TextBox1.Value = Me.ComboBox1.Value
End Sub

Cordialement.
Daniel
"Michel69" news:
Bonjour à tous,

Comment en VBA, à partir du choix dans une combo (liste), je peux faire
afficher dans une txtbox une valeur correspondante ?
Ex : si je selectionne dans mon useform "Ouest" dans une combo (liste
rowsource) , je voudrais faire afficher dans la Txtbox suivante le critère
"Oui" et où placer ce bout de code ?

Merci d'avance







Daniel
Le #4905771
J'avais cru à une erreur de frappe. Essaie :

Private Sub ComboBox1_Change()
If Me.ComboBox1.Value = "Ouest" Then
Me.TextBox1.Value = "Oui"
Else
Me.TextBox1.Value = ""
End If
End Sub

Daniel
"Michel69" news:
Merci Daniel pour ta réponse rapide mais si j'ai bien compris, dans ton
code,
la textbox prend la valeur du choix fait dans la combo ?
En fait, ma question était : si je choisi le mot "Ouest" dans la combo,
comment faire afficher le mot "Oui" dans ma textbox et où mettre le code
Encore merci


Bonjour.

Private Sub ComboBox1_Change()
Me.TextBox1.Value = Me.ComboBox1.Value
End Sub

Cordialement.
Daniel
"Michel69" de
news:
Bonjour à tous,

Comment en VBA, à partir du choix dans une combo (liste), je peux faire
afficher dans une txtbox une valeur correspondante ?
Ex : si je selectionne dans mon useform "Ouest" dans une combo (liste
rowsource) , je voudrais faire afficher dans la Txtbox suivante le
critère
"Oui" et où placer ce bout de code ?

Merci d'avance









Michel69
Le #4905741
Daniel,
J'ai testé, celà fonctionne parfaitement
Encore merci


J'avais cru à une erreur de frappe. Essaie :

Private Sub ComboBox1_Change()
If Me.ComboBox1.Value = "Ouest" Then
Me.TextBox1.Value = "Oui"
Else
Me.TextBox1.Value = ""
End If
End Sub

Daniel
"Michel69" news:
Merci Daniel pour ta réponse rapide mais si j'ai bien compris, dans ton
code,
la textbox prend la valeur du choix fait dans la combo ?
En fait, ma question était : si je choisi le mot "Ouest" dans la combo,
comment faire afficher le mot "Oui" dans ma textbox et où mettre le code
Encore merci


Bonjour.

Private Sub ComboBox1_Change()
Me.TextBox1.Value = Me.ComboBox1.Value
End Sub

Cordialement.
Daniel
"Michel69" de
news:
Bonjour à tous,

Comment en VBA, à partir du choix dans une combo (liste), je peux faire
afficher dans une txtbox une valeur correspondante ?
Ex : si je selectionne dans mon useform "Ouest" dans une combo (liste
rowsource) , je voudrais faire afficher dans la Txtbox suivante le
critère
"Oui" et où placer ce bout de code ?

Merci d'avance














Publicité
Poster une réponse
Anonyme