通过Excel vba打开CSV文件 – 更改date格式

关于这个问题已经有很多问题了，但是没有一个答案似乎为我解决了这个问题。 问题是这样的：我不得不编辑大量的.csv文件，所以我通过Excel VBA做到这一点。 前三列是格式为dd / mm / yyyy hh：mm：ss的date，这些date在通过打开时转换为美国格式MDY

set wb1 = Workbooks.Open (Filename:=savefolder & filename, Local:=True) 

解决此问题最常见的答案围绕已知的“function”Excel将打开CSV与美国dateformat，除非区域设置通过本地：= True使用，但我已经这样做，它仍然无法正常工作。 任何人都可以build议的设置，可能需要改变以获得下面的代码工作？ 谢谢。

  Sub cleandata() dim wb1 as workbook dim ws1 as worksheet dim savefolder, filename as string savefolder = "C:\Users\ME\Desktop\Clean Up Folder\" filename = dir(savefolder & "*") Do while len(filename) >0 set wb1 = Workbooks.Open (Filename:=savefolder & filename, Local:=True) set ws1 = wb1.worksheets(1) 'code related to what I am wanting to do to the data to 'clean it up' wb1.close true filename = dir() Loop End Sub 

Answer 1

使用Data >> From Text工具打开文件：在stream程的第3步中，您可以指定传入数据的date格式。

录制一个macros会给你一个开始所需的代码。