contrôler le contenu d'une TextBox

[cabsen]

Bonsoir le forum,

Je cherche un moyen de contrôler si les caractères saisis dans une TextBox appartiennent tous aux groupes [a-Z] et [0-9] plus le trait d'union (-) et l'underscore (_). Je me doute que je ne suis pas le premier à rechercher ce moyen mais impossible de trouver un article sur le sujet en VBA.

D'avance merci ! 😉

 

[skoobi]

Re : contrôler le contenu d'une TextBox

Bonsoir,

voici un fichier exemple que tu peux utiliser.

 

[cabsen]

Re : contrôler le contenu d'une TextBox

Merci skoobi,

C'est exactement ce que je cherchais à faire ! 🙂

 

[Cousinhub]

Re : contrôler le contenu d'une TextBox

Bonsoir,
skoobi, pour empêcher "effectivement" la saisie de tout caractère interdit, te propose la modif suivante :

.....
MsgBox "Ce caractère est interdit."
TextBox1.Value = Left(TextBox1.Value, Len(TextBox1.Value) - 1)
Exit Sub
....

 

[Pierrot93]

Re : contrôler le contenu d'une TextBox

Bonjour Cabsen, Skoobbi, bhbh

une autre solution, utiliser l'événement "keypress" :

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If Not Chr(KeyAscii) Like "[0-9]" And Not Chr(KeyAscii) Like "[a-z]" And Not Chr(KeyAscii) Like "[A-Z]" _
        And Not Chr(KeyAscii) Like "-" And Not Chr(KeyAscii) Like "_" Then KeyAscii = 0
End Sub

bonne journée
@+

 

[skoobi]

Re : contrôler le contenu d'une TextBox

Bonsoir,
skoobi, pour empêcher "effectivement" la saisie de tout caractère interdit, te propose la modif suivante :

.....
MsgBox "Ce caractère est interdit."
TextBox1.Value = Left(TextBox1.Value, Len(TextBox1.Value) - 1)
Exit Sub
....

Bonjour bhbh,

oui, effectivement, je m'en suis rendu compte par après.