将单个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

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

Answer 2

作为第一个答案，以下是用于将文件保存为CSV的代码：

ActiveWorkbook.SaveAs "C:\Marthinus.csv", fileformat:=6

有关SaveAs

的更多信息