Nombre de caractère dans une TextBox1

[deni29]

Bonjour le forum,

Dans une Userform je viens inscrire dans une TextBox1, une chaine de caractère via la lecture d'un code barre, j'obtiens par exemple
3BA12345AAAA
il me faut minimun 12 caractères,si je ne les ai pas j'envoi l'info suivante :

If Not Len(TextBox1) >= 12 Then

Message = MsgBox('Merci de respecter la syntaxe, 12 caractères minimun!', vbRetryCancel, 'Référence')
If Message = vbCancel Then Unload Me

Exit Sub

end if

Mon Probléme est que parfois il y a plus de 12 caractéres (exemple : 3BA12345AAAA ED04)
Je voudrais donc en plus de vérifier si le nombre de caractéres est bien de 12, supprimer tous les caractères à partir du 13 ième.

J'espère que mon explication est claire.

il y a surement une solution.

merci d'avance

deni29

 

[excalibur]

bonjour deni29 le forum tu peus faire simplement en limitant le nombres de caracteres maxi. dans proprietes de ta textbox maxlength tu limites a 12 salutations