Copier la date de l’UserForm a la feuille avec condition

Bonjour à tous !!

Je viens à vous aujourd’hui pour un problème d’affichage de la date sur la feuille de destination.

Voilà j’ai un UserForm qui affiche la date d’aujourd’hui, ça marche bien par exemple il affiche aujourd’hui 05/03/2013 « jour, mois, année).

Mais lorsque je veux le copier sur la feuille « ACCUEIL » on clique sur le Botton « Valide » il m’affiche une date en forme « mois, joue, année).

J’ai utilisé les codes que je connais mais ça ne marche pas

Me.TextBox1_date = VBA.Date

Me.TextBox1_date = Format(Date, "dd/mm/yyyy")

Y a-il un autre code pour résoudre ce problème et merci a vous.

Bonjour

Essayes

Sheets("ACCUEIL").Cells(no_ligne, 1) = CDate(TextBox1_date)

Salut

Comme d’habitude vite fort et sûr.

Merci à vous ça marche très très bien.

A plus et bonne journée a vous.