Bonjour,

Je n'arrive pas à mettre en forme une date saisie dans un formulaire :
Lors de la fermeture du formulaire les données saisies sot recopiées dans des cellules d'une feuille de calcul ; j'ai défini sur les cellules de la 1ere colonne de ma feuille de calcul un format "Date" sous forme "jj/mm/aaaa".
Dans le module (voir code ci-dessous) je force la valeur de la textbox à ce format :
If saisie.date_ev.Value <> "" Then
If Not IsDate(saisie.date_ev.Value) Then
MsgBox "Date incorrecte.", vbCritical + vbOKOnly, "Erreur"
saisie.date_ev.Value = ""
saisie.date_ev.SetFocus
saisie.Hide
saisie.Show
Else
saisie.date_ev.Value = Format(saisie.date_ev.Value, "dd/mm/yyyy")
End If
End If
Or malgré toutes ces précautions, la date recopiée dans la cellule est au format "mm/jj/aaaa".
Je ne souhaite pas modifier les préférences régionales.

Quelqu'un a-t-il une solution ?

Merci d'avance