# 怎么批量将CSV格式转换为xlsx或xls格式?
下面给大家介绍几种方法:
## 1、原始方法
如果是少量的Excel文件可以采用打开——另存为。。,选择想要转换的格式就OK了!
## 2、利用Excel的VBA
在你要转换的CSV文件夹中新建一个EXCEL文件并打开,创建一个宏。
然后在VBA通用窗体中输入下面代码:
Sub 转换()
Application.ScreenUpdating = False
pth = ThisWorkbook.Path & ""
flnm = Dir(pth & "*.csv")
Do While Len(flnm) > 0
With Workbooks.Open(pth & flnm, ReadOnly:=True)
.SaveAs Replace(flnm, ".csv", ""), IIf(Application.Version >= 12, xlWorkbookDefault, xlWorkbookNormal)
.Close
End With
flnm = Dir
Loop
End Sub
D:\myFiles\write是输出路径,然后点击工具栏中的运行-运行子过程/用户窗体,新的表格会自动保存。
3、利用小软件
这款软件的名字叫CSVtoExcel,是一款完全免费的批量CSV转EXCEL转换器,输出格式为xls和xlsx,转换时需要将csv文件都放到同一文件夹下,一键转换即可完成。
特色:无需安装,完全免费,自定义输出路径,一键操作,WPS和OFFICE都可以。
下载地址:/softview/SoftView_579062.html#download