Microsoft 365 transformation des dates FR en date ENG lors de l'export en .txt avec vba

Bonjour,

J'ai créé une macro en vba pour sauvegarder automatiquement mon fichier XLSM en TXT, sauf que les dates présentes en format FR sur mon fichier excel se transforment en format ENG une fois la macro executée dans le fichier txt (ne bougent pas dans le excel).

Lorsque je fais le save as manuellement et que je choisis "Text (Tab delimited) (*.txt), la date reste bien en FR. Du coup, je ne comprends pas.

Ci-dessous la partie de mon code :
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Sheets("for cresus13001").Select
ChDir _
"C:\Users\ad\Dropbox\"
ActiveWorkbook.SaveAs Filename:= _
"C:\Users\ad\Dropbox\XXX.txt" _
, FileFormat:=xlText, CreateBackup:=False


Workbooks("XXX.txt").Close SaveChanges:=False

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Pourriez-vous m'aider ?