我想将.CSV文件转换为.XLSX。
到目前为止,我已经有了这段代码
2.7.0
我的问题是,即使我在Google上搜索了一些线索以在“面板控件>区域”中选择定界符,并在SaveAs方法中使用local = True,VB仍然继续使用逗号作为定界符,而不是分号,因此我的Excel文件不可用。
关于将CSV保存到xlsx时如何选择一个定界符有什么提示吗? :)
非常感谢您的光临!
答案 0 :(得分:1)
所以我不知道是否有答案将主题标记为已解决,但是如果解决方案是在评论中找到了我的MacroMarc:
与其使用saveAs函数将csv文件另存为Excel,不如将OpenText方法与Local:= True;一起使用。最后是另存为没有特定参数的xlsx:
代替:
oExcelFile.Workbooks.Open(strFolderPath)
oExcelFile.ActiveWorkbook.SaveAs(Filename:=path, FileFormat:=Excel.XlFileFormat.xlOpenXMLWorkbook, CreateBackup:=False, Local:=True)
使用此:
oExcelFile.Workbooks.OpenText(Filename:=strFolderPath, Local:=True)
oExcelFile.ActiveWorkbook.SaveAs(Filename:=path, FileFormat:=Excel.XlFileFormat.xlOpenXMLWorkbook, CreateBackup:=False)
再次感谢您的帮助! :)