Signaler

Format textbox letres et chifres combinées Excel VBA [Résolu]

Posez votre question Almeap 3Messages postés samedi 17 juin 2017Date d'inscription 17 juin 2017 Dernière intervention - Dernière réponse le 17 juin 2017 à 19:02 par Almeap
Bonjours

Dans une TextBox j'aimerais avoir une espace automatique entre les 6 caractères pour des numéros de plaque ou code postale ici au Canada le numéro de plaque ressemble à A20 LCF et les codes postal à A2B 3C4 je connais le code pour espace entre des chiffres mais ne fonctionne pas si y a des letres et chiffres combinées.
Si quelqu'un a la solution en code VBA je serais bien heureux de ça.
Merci
Afficher la suite 
Utile
+0
plus moins
Bonjour Almeap

Par format personnalisé je ne pense pas que ce soit possible mais tu peux :
1) limiter l'entrée de 6 caratères dans ton textbox en mettant sa propriété MaxLength à 6
2) Associer en VBA un code de ce type à ton userform pour insérer un espace au milieu des 6 caractères à la sortie du Textbox :
Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Left(TextBox1, 3) & " " & Right(TextBox1, 3)
End Sub

Cdlmnt
Via

Donnez votre avis
Utile
+0
plus moins
Je te remercie avec de multiples essais et avec l'aide de mon Fils nous avons trouver la solution.

Dim CODEPOSTALE As String
Dim PREMIER As String
Dim DERNIER As String
Dim CODEPOSTALE1 As String

Private Sub TextBox1_AFTERUPDATE()
CODEPOSTALE = TextBox1.Value
If CODEPOSTALE = "" Then
Exit Sub
End If

PREMIER = Left(CODEPOSTALE, 3)
DERNIER = Right(CODEPOSTALE, 3)
CODEPOSTALE1 = PREMIER & " " & DERNIER
TextBox1.Value = CODEPOSTALE1

End Sub

Un gros merci a toi bonne journée
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !