230问答网 > 我想把excel表格批量转为csv，表格太多了，一个个转太麻烦，向高手求助

我想把excel表格批量转为csv，表格太多了，一个个转太麻烦，向高手求助

2024-12-12 01:50:20

推荐回答（3个）

回答1：

工作表都在同一个工作薄?
ALT+F11打开VBA编辑窗口,在左边列表框点鼠标右键选插入模块粘贴以下代码后,关闭VBA编辑窗口,在工作表页面按ALT+F8 点选转换CSV,按回车执行或点击执行按钮.该工作薄里所有的工作表都保存在这个工作薄的路径下.文件名就是: 工作表名.csv
Sub 转换CSV()
iPath = ThisWorkbook.Path
For n = 1 To Worksheets.Count
Name = "\" & Sheets(n).Name & ".csv"
filepath = iPath & Name
Sheets(n).SaveAs Filename:=filepath, FileFormat:= _
xlCSV, CreateBackup:=False
Next
End Sub

回答2：

将文件“另存为”，在“另存为”对话框的“保存类型”选项中选择相应的csv格式即可

回答3：

你是要转一个工作簿中的多个表格，还是多个工作薄中的多个表格？