excel - 如何使用VBA保存分号分隔的csv文件？

Question

我将数据复制到电子表格中，使用 VBA 对其进行格式化，然后将该工作表保存到 CSV 文件中。

我使用以下代码:

ws.SaveAs Filename:=filestr, Fileformat:=xlCSV

ws是我保存的工作表。

这为我提供了一个以逗号分隔的 CSV 文件。

我想将该工作表保存到以分号分隔的文件中。

我发现了以下内容:

1. 转到“开始”>“设置”>“区域和语言选项”
2. 点击“自定义”按钮
3. 在列表分隔符旁边输入分号 (;)

我按照上述过程并将代码更改为:

ws.SaveAs Filename:=filestr, Fileformat:=xlCSV, Local:=True

我仍然得到一个以逗号分隔的 CSV 文件作为输出。

我使用的是 Excel 2003，操作系统是 Windows XP。

Answer 1

我刚刚检查过这个，因为遇到了同样的问题。在这种情况下，文件名没有任何功能。

这对我有用:

With ActiveWorkbook
    .SaveAs Filename:="My File.csv", FileFormat:=xlCSV, Local:=True
    .Close False
End With

在区域设置中 -> ; <- 作为列表分隔符。同样重要的是，关闭时不要保存更改 -> 关闭时必须使用 False。