我读过这个问题:我可以根据 Excel 2007 中的列将电子表格拆分为多个文件吗?
我对“以与原始工作簿相同的格式保存”有疑问,希望您能帮助我。
我正在将宏与 CSV 文件一起使用,但我想获得像 XLS 这样的最终文件。
如何更改宏以保存这种格式(不同于原始格式)?
答案1
以下是一个典型示例:
Sub Sample_Cvs_To_Xlsx()
ChDir "C:\TestFolder"
Workbooks.Open Filename:="C:\TestFolder\WhatEver.csv"
'
' perform processing
'
ActiveWorkbook.SaveAs Filename:="C:\TestFolder\WhatEver.xlsx", FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False
ActiveWorkbook.Close
End Sub