将单个Excel工作表另存为CSV

Question

我需要解析Excel工作表.现在我将每个工作表保存为.csv并且效果很好.我使用OpenCSV来解析文件等,但创建这些.csv文件是一件痛苦的事.

在Excel中以.csv保存单个工作表的最简单,最快捷的方法是什么？我假设某种VBA宏可以完成这项工作,但由于我不是VBA程序员,我不知道该怎么做.也许我只能以某种方式记录一个宏？

Answer 1

非常粗略,

Dim ws As Worksheet

For Each ws In ActiveWorkbook.Worksheets
    ws.SaveAs "C:\docs\" & ws.Name & ".csv", xlCSV
Next

这不包括任何错误编码,也不会允许导致非法文件名的工作表名称.这一切都取决于你需要整体的强大程度.