G
G'Claire
Guest
Le forum
Sur ce code :
Private Sub TextBox5_Change() 'Format Telephone (Grace à Ti !!!)
Dim Phone As String
Phone = TextBox5.text
Select Case Len(Phone)
Case 2, 5, 8, 11, 14
Phone = Phone & " "
End Select
TextBox5.text = Phone
End Sub
Comment pourrais-je faire pour ne pas avoir un espace a la fin du Numéro, car j'ai un MsgBox qui verifie le nombre de chiffre, et quand je fais une mise a jour du numéro cela ne fonctionne pas, en raison de cet espace créer
Je vous remercie d'avance, G'Claire
Sur ce code :
Private Sub TextBox5_Change() 'Format Telephone (Grace à Ti !!!)
Dim Phone As String
Phone = TextBox5.text
Select Case Len(Phone)
Case 2, 5, 8, 11, 14
Phone = Phone & " "
End Select
TextBox5.text = Phone
End Sub
Comment pourrais-je faire pour ne pas avoir un espace a la fin du Numéro, car j'ai un MsgBox qui verifie le nombre de chiffre, et quand je fais une mise a jour du numéro cela ne fonctionne pas, en raison de cet espace créer
Je vous remercie d'avance, G'Claire