所以我上传Excel文件然后将其保存为文本文件,但我的日期格式有问题。
我的excel日期格式为dd / MM / yyyy,但当我将其保存为文本文件时,其格式为MM / dd / yyyy
Imports Microsoft.Office.Interop
Dim FileName As String = "C:\myExcelData.txt"
Dim xl As New Excel.Application
Dim xlBook As Excel.Workbook = xl.Workbooks.Open("C:\myExcel.xlsx")
Dim xlSheet As Excel.Worksheet = xlBook.Sheets("Sheet1")
xl.DisplayAlerts = False
xlSheet.SaveAs(FileName, Excel.XlFileFormat.xlTextWindows)
xlBook.Close()
在myExcel.xlsx中日期是2014年1月31日
在myExcelData.txt日期是2014年1月31日
答案 0 :(得分:0)
尝试添加最后一个参数Local:=True
:
xlSheet.SaveAs(Filename:=FileName, FileFormat:=Excel.XlFileFormat.xlTextWindows,Local:=True)