Excel VBA更改日期格式

我在数据导入方面有问题。我正在使用以下代码从另一个CSV导入数据

子导入（ByVal sFileName作为字符串）
将wb1设置为工作簿
将wb2设置为工作簿
将工作表设置为工作表
从范围开始
设置wb1=ActiveWorkbook
设置粘贴开始=[DATA！A1]
“清洁数据表
工作表（“数据”）。选择
单元格。选择
选择.ClearContents
如果是空的（sFileName），那么
MsgBox“未指定文件”，VBEQUOTE，“错误”
出口接头
其他的
设置wb2=工作簿。打开（文件名：=sFileName，分隔符：=“；”）
对于wb2.Sheets中的每张工作表
使用Sheet.UsedRange
.复制粘贴开始
设置PasteStart=PasteStart.Offset（.Rows.Count）
以
下一页
如果结束
wb2.关闭
'如果需要，将文本添加到列
调用texttocolumnsimitocoma
'激活主工作表
工作表（“荷兰DCA”）。激活
"完整信息"
MsgBox（“数据导入完成”）
端接头

---

问题是宏更改了日期。例如，原始文件的日期为2019年10月12日（dd/mm/yyyy），但在导入后为2019年12月10日（dd/mm/yyyy）。您知道哪里会出问题吗？

您的区域设置中设置的日期格式是什么？@GSerg DD/mm/yyyyyok问题在于区域设置和除味器。都搞定了。