VBA - SaveAs dateouput是错误的

Question

我正在尝试将工作表（“输出”）导出到.CSV文件。除数据不正确外，一切正常。日期格式不正确。例： 在工作表（“输出”）中，dateformat是dd / mm / yyyy，但当我将其导出到.CSV并用Excel打开时，格式已更改为mm / dd / yyyy。 知道为什么会这样或者如何防止这种情况吗？

With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
    .Show
    Worksheets("Output").Copy
    ActiveWorkbook.SaveAs fileName:=.SelectedItems(1) & "TestFileName".csv", FileFormat:=xlCSV, CreateBackup:=False
    ActiveWorkbook.Close SaveChanges:=False
    MsgBox ("Export is succesful")
End With