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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
With Worksheets("BD")
.Range("S" & i).Value = Txtdate.Value
Cordialement