Aide dans le vba
Fermé
help
-
15 févr. 2005 à 07:09
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 15 févr. 2005 à 09:37
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 15 févr. 2005 à 09:37
3 réponses
blux
Messages postés
26028
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
9 mai 2024
3 289
15 févr. 2005 à 08:24
15 févr. 2005 à 08:24
Salut,
On peut parfaitement définir un masque de saisie pour contrôler les valeurs que l'utilisateur rentrera...
Pour obliger la saisie de 4 chiffres, il prendra la valeur : 0000
Tu pourras définir ce masque dans les propriétés de l'objet (rubrique 'masque de saisie')
On peut parfaitement définir un masque de saisie pour contrôler les valeurs que l'utilisateur rentrera...
Pour obliger la saisie de 4 chiffres, il prendra la valeur : 0000
Tu pourras définir ce masque dans les propriétés de l'objet (rubrique 'masque de saisie')
Sacred
Messages postés
676
Date d'inscription
lundi 7 février 2005
Statut
Membre
Dernière intervention
29 juillet 2006
77
15 févr. 2005 à 08:34
15 févr. 2005 à 08:34
tu clic sur ta case et tu lui donne un format
en plus tu mets une condition évenementiel
Si txt<0 (si mes souvenir sont bon ca va signifier interdi au caractere)
alors txt en rouge
voila
en plus tu mets une condition évenementiel
Si txt<0 (si mes souvenir sont bon ca va signifier interdi au caractere)
alors txt en rouge
voila
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 686
15 févr. 2005 à 09:37
15 févr. 2005 à 09:37
bonjour
il faut que tu mettes ce contrôle :
Public Sub textbox1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 or KeyAscii > 57 Then
KeyAscii = 0
beep
End If
End Sub
textbox1 doit être remplacé par le nom réel.
Ainsi, la frappe est contrôlée au moment de la saisie.
il faut que tu mettes ce contrôle :
Public Sub textbox1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 or KeyAscii > 57 Then
KeyAscii = 0
beep
End If
End Sub
textbox1 doit être remplacé par le nom réel.
Ainsi, la frappe est contrôlée au moment de la saisie.
