Code vba format telephone portable

Résolu/Fermé
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 4 août 2015 à 16:40
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 4 août 2015 à 17:30
Bonjour,

Je suis a la recherche du code VBA pour un format téléphone dans une texte box;
Actuellement j'ai ceci comme début de code:
PrivateSubPortable_Change()
End Sub
Je souhaiterais que mon n° s'affiche comme suit: xx/xx/xx/xx/xx
Merci pour votre aide
Cordialement




1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
4 août 2015 à 16:58
Bonjour,

Voir ceci:

http://www.excelabo.net/excel/imposer_format_textbox
0
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
4 août 2015 à 17:04
Private Sub TextBox1_Change()
If TextBox1.TextLength = 10 Then
TextBox1.Value = Format(TextBox1.Value, "00/"" ""00/"" ""00/"" ""00/"" ""00")
MsgBox "stop"
End If
End Sub
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424 > cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024
4 août 2015 à 17:30
Bonjour
Merci pour ta réponse c'est nickel
Cordialement
0