Provoquer un évenement avec une lettre
Fermé
max850
Messages postés
305
Date d'inscription
dimanche 10 janvier 2016
Statut
Membre
Dernière intervention
4 janvier 2020
-
4 oct. 2019 à 00:39
max850 Messages postés 305 Date d'inscription dimanche 10 janvier 2016 Statut Membre Dernière intervention 4 janvier 2020 - 4 oct. 2019 à 12:14
max850 Messages postés 305 Date d'inscription dimanche 10 janvier 2016 Statut Membre Dernière intervention 4 janvier 2020 - 4 oct. 2019 à 12:14
A voir également:
- Provoquer un évenement avec une lettre
- Dans le texte, un seul mot a réellement été écrit en lettres capitales (majuscules). quel est ce mot ? ✓ - Forum Word
- Excel mois en lettre ✓ - Forum Excel
- Comment savoir si une lettre suivie est arrivée ✓ - Forum Loisirs / Divertissements
- Trouver une phrase avec des lettres dans le désordre - Forum Loisirs / Divertissements
- Lettre de motivation concours aide soignant forum - Forum Études / Formation High-Tech
2 réponses
f894009
Messages postés
16904
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
18 mars 2023
1 678
4 oct. 2019 à 07:00
4 oct. 2019 à 07:00
Bonjour,
structure du code en attendant se savoir si majuscule ou pas.
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
jordane45
Messages postés
37253
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
17 mars 2023
4 551
4 oct. 2019 à 07:05
4 oct. 2019 à 07:05
Bonjour
Dans les event de ta textbox tu dois pouvoir trouver le keypress
Dans les event de ta textbox tu dois pouvoir trouver le keypress
max850
Messages postés
305
Date d'inscription
dimanche 10 janvier 2016
Statut
Membre
Dernière intervention
4 janvier 2020
3
4 oct. 2019 à 12:14
4 oct. 2019 à 12:14
merci jordan45 pour ta contribution
j'ai adapté la réponse de f894009 à mon cas et ça fonctionne très bien
j'ai adapté la réponse de f894009 à mon cas et ça fonctionne très bien
4 oct. 2019 à 12:13
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