VBA Excel : Format de date

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