Format Date dans un UserForm

J

Jano

Guest
Bonjour à tous,
est-il possible d'attribuer un format date à un champ de saisie dans un userform (textbox ou autre...) afin de simplifier cette saisie ex: XX / XX / XX

Merci pour votre aide
(je suis novice pour VBA)
 
P

petchy

Guest
bonsoir Jano,chris et le forum

Jano voila un code pour le format date pour un textbox dans un USF

Private Sub TextBox1_Change()
Dim Val As Byte
TextBox1.MaxLength = 10
Val = Len(TextBox1)
If Val = 2 Then TextBox1 = TextBox1 & "/"
If Val = 5 Then TextBox1 = TextBox1 & "/"
End Sub

img]http://img98.exs.cx/img98/8098/Petchy.gif[/img]
smiley_416.gif
noel_5.gif
 

Discussions similaires

Statistiques des forums

Discussions
312 489
Messages
2 088 870
Membres
103 980
dernier inscrit
grandmasterflash38