# 怎么批量将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都可以。
