probleme masque de saisie VBA Excel Résolu/Fermé

Question

Bonjour, 

Je souhaiterais affecter un masque de saisie personnalisé à une textbox de ce type :

"A.44.A.04.04"

J'avais bien trouver quelque chose mais il fallais appuyer sur une touche pour mettre les points donc pas tres pratique !

quelqu'un aurait une idée ?  

Merci d'avance



Configuration: Windows 7 / Internet Explorer 9.0

michel_m · Answer

Bonjour 

as tu: 
Toujours 1 lettre, 2 chiffres, 1 lettres.... 
Toujours A pour la lettre ? 
Toujours 0Y pour les 2 derniers ou XY 

et enfin
Toujours 8 caractères ?

 Michel

ccm81 · Answer

bonjour

ceci correspond t'il ?


Dim lt As Long
lt = Len(TextBox1.Text)
If lt = 1 Or lt = 4 Or lt = 6 Or lt = 9 Then
  TextBox1.Text = TextBox1.Text & "."
End If
bonne suite

Vincb9 · Answer

C'est bien ça merci beaucoup !

Probleme masque de saisie VBA Excel

3 réponses