probleme format date

bonjour les maîtres du vba,

Encore besoin de vos lumières :
Pour faciliter la saisie de données, j'ai créé un formulaire. pour la date j'utilise la ligne de code suivante :

Code:

---

1 2	'Date Txtdate.Value = Format(Now(), "dd/mm/yyyy")

---

celle ci fonctionne très bien et me mets bien la date sous la forme "dd/mm/yyyy"
même quand la date du jour est dans les 12 premiers jours du mois (exemple : 01/07/2012)

Par contre sur la période des 12 premiers jours du mois quand je transferts les données sur la feuille excel, la format de date se transforme en "mm/dd/yyyy" (pour l'exemple ci dessus : 07/01/2012)
j'ai essayé de différentes façon mais toujours pareil. Pas de problème dans le transfert après le 12 de chaque mois.
Pouvez vous m'aider?

Mon code pour le transfert de la date :

Code:

---

1 2	With Worksheets("BD") .Range("S" & i).Value = Txtdate.Value

---

Cordialement

Bonjour,

Ci dessous une solution

Code:

---

1 2	With Worksheets("BD") .Range("S" & i).Value = DateValue(Txtdate.Value)

---

Bonjour,

Essaie avec

Code:

---

.Range("S" & i).Value = CDate(Txtdate.Value)

---

Cordialement.

EDIT : bonjour jfontaine ;)

Un grand merci à vous deux. ça fonctionne

Cordialement
lps02