Probleme format date avec formule vba forcage majuscules

Bonsoir,

J'ai un soucis dans mes feuilles excel avec la formule de basculement automatique en majuscules:

Private Sub Worksheet_Change(ByVal zz As Range)
If Intersect(zz, [A1:J68]) Is Nothing Then Exit Sub
Application.EnableEvents = False
zz = UCase(zz)
Application.EnableEvents = True
End Sub

cela me change le format des dates pour les 12 premiers jours, mois et jours sont inversés et ensuite ils sont ok malgrès un forcage jj-mm-aaaa?

Tres intriguant, je viens de m'en apercevoir, bonjour le boulot! LOL

Des idées?