Provoquer un évenement avec une lettre
max850
Messages postés
312
Statut
Membre
-
max850 Messages postés 312 Statut Membre -
max850 Messages postés 312 Statut Membre -
Bonsoir la communauté
Je voudrais qu'en rentrant une lettre (mettons L) dans une textbox de mon userform cela me déclenche l'apparition d'une combobox que j'ai rendu invisible dans mon initialization de cet userform
j'ai rentré un bouton command qui me déclenche bien la visibilité de ma combobox mais il y a certainement une solution beaucoup plus simple qui m'éviterait d'utiliser un bouton command
Pourriez vous m'aider svp
merci
Je voudrais qu'en rentrant une lettre (mettons L) dans une textbox de mon userform cela me déclenche l'apparition d'une combobox que j'ai rendu invisible dans mon initialization de cet userform
j'ai rentré un bouton command qui me déclenche bien la visibilité de ma combobox mais il y a certainement une solution beaucoup plus simple qui m'éviterait d'utiliser un bouton command
Pourriez vous m'aider svp
merci
2 réponses
-
Bonjour,
structure du code en attendant se savoir si majuscule ou pas.Private Sub TextBox1_Change() If TextBox1 <> "" Then ComboBox1.Visible = True Else ComboBox1.Visible = False End If End Sub-
bonjour f894009
j'ai adapté ton code pour pouvoir entrer une lettre differente en majuscule et faire apparaitre la combobox correspondant à la lettre
Private Sub TextBox5_Change()
TextBox5.MaxLength = 1
If TextBox5 = "L" Then
ComboBox3.Visible = True
ElseIf TextBox5 = "M" Then
ComboBox2.Visible = True
ElseIf TextBox5 = "V" Then
ComboBox1.Visible = True
End If
End Sub
Private Sub textbox5_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 76
KeyAscii = KeyAscii 'force l'entrée de la lettre majuscule L
Case 77
KeyAscii = KeyAscii 'force l'entrée de la lettre majuscule M
Case 86
KeyAscii = KeyAscii 'force l'entrée de la lettre majuscule V
Case Else
KeyAscii = 0
End Select
End Sub
et cela me satisfait pleinement
merci beaucoup pour ton aide
-
-
Bonjour
Dans les event de ta textbox tu dois pouvoir trouver le keypress
