Remplir textbox en fonction combobox [Résolu]

Signaler
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
-
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
-
Bonjour le forum
Sur un userform j’ai un combobox avec trois choix
("compréhension de l’écrit" ; "compte rendu de la production écrite" ; " ")
Je veux quand le choix cmb est rien donc valeur textbox (nommé c_ent67) sera rien
Et quand le choix cmb est "compréhension de l’écrit" alors valeur textbox sera "compte rendu de la production écrite" et le troisième cas est l’inverse du deuxième
J’utilise le code suivant mais marche pas bien qu’il faut

Private Sub ComboBox7_Change()
   If ComboBox7.Value = "compréhension de l’écrit" Then
             Me.c_ent67.Value = "compte rendu de la production écrite"
   Else
             Me.c_ent67.Value = "compréhension de l’écrit"
    End If     
End Sub
‘Dans l’Initialize :
Private Sub UserForm_Initialize()
ComboBox7.RowSource = "cours"      'Récupération des Données
ComboBox7 = Sheets("Param").Range("Y22")
End Sub

Merci d’avance pour toute aide.

2 réponses

Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
3
bonjour,
c'était une erreur de page du site ou de connexion chez moi la première tentative mon message n'est pas valider alors j'ai réécris le message et une autre validation.
que dois je faire maintenant?
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
3
bonjour,
la plage nommée "cours" c'est ("J3:J5) de la feuille nommée "Param"