Problème de Date avec une Userform

Bonjour LouLou, le Forum

Ce Forum est doté d'un moteur de recherche qui fonctionne très bien maintenant. On le trouve en haut de cette fenêtre sour la barre :



Si tu avais un tant soit peu cherché, "TextBox Format Date"... c'est une question récurrente...

Bonne Recherche, et si tu as encore cinq minutes passe aussi par notre Charte

Bon Dimanche
@+Thierry

LouLou13, le forum

Essaye avec ceci (A adapter biensur pour ton cas) :

Private Sub CommandButton1_Click()
With Sheets("Feuil1")
[a1] = CDate(TextBox1)
End With
End Sub

Salut, G'Claire