If Len(TextBox.Text) > 5 Then MsgBox "Pas plus de 5 caractères", vbOKOnly, "Erreur de caractères" Exit Sub End If
-- Daniel FAQ MPFE http://dj.joss.free.fr/faq.htm
VBAXL http://dj.joss.free.fr/
"pedro" a écrit dans le message de news:
Bonjour à toute la communauté
J'aimerais limiter le nombre de caractère dans un TexBox Comment faire
Merci de votre aide
Pedro
MichDenis
Si ton textbox est dans la feuille de calcul et émane de la boîte à outils "Contrôle", le contrôle "textbox" a une propriété "MaxLenght" où tu peux définir le nombre de caractères possibles à saisir dans ce dernier.
Cela s'applique aussi dans le cas d'un textbox sur un formulaire.
Et par programmation, tu pourrais utiliser ceci :
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If Len(TextBox1) >= 5 Then KeyAscii = 0 End If End Sub
"pedro" a écrit dans le message de news:
Bonjour à toute la communauté
J'aimerais limiter le nombre de caractère dans un TexBox Comment faire
Merci de votre aide
Pedro
Si ton textbox est dans la feuille de calcul et émane
de la boîte à outils "Contrôle", le contrôle "textbox"
a une propriété "MaxLenght" où tu peux définir le nombre
de caractères possibles à saisir dans ce dernier.
Cela s'applique aussi dans le cas d'un textbox sur un formulaire.
Et par programmation, tu pourrais utiliser ceci :
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Len(TextBox1) >= 5 Then
KeyAscii = 0
End If
End Sub
"pedro" <pedro@discussions.microsoft.com> a écrit dans le message de news:
0F38F395-3B65-4521-92B7-1F9EDBA8DBB9@microsoft.com...
Bonjour à toute la communauté
J'aimerais limiter le nombre de caractère dans un TexBox
Comment faire
Si ton textbox est dans la feuille de calcul et émane de la boîte à outils "Contrôle", le contrôle "textbox" a une propriété "MaxLenght" où tu peux définir le nombre de caractères possibles à saisir dans ce dernier.
Cela s'applique aussi dans le cas d'un textbox sur un formulaire.
Et par programmation, tu pourrais utiliser ceci :
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If Len(TextBox1) >= 5 Then KeyAscii = 0 End If End Sub
"pedro" a écrit dans le message de news:
Bonjour à toute la communauté
J'aimerais limiter le nombre de caractère dans un TexBox Comment faire