将文件另存为 CSV UTF8 会出现错误 1004答案

【问题标题】：Save File as CSV UTF8 gives error 1004将文件另存为 CSV UTF8 会出现错误 1004
【发布时间】：2017-04-27 13:14:25
【问题描述】：

我想保存在许多单元格中包含中文字符的工作表的内容。我使用录制的宏获得了以下代码。

ActiveWorkbook.Sheets("input").SaveAs fileName:="D:\File1.csv", FileFormat:=xlCSVUTF8

但是当我运行它时，我得到运行时错误 1004：方法 SaveAs of object _workbook failed。

如果我将FileFormat:=xlCSVUTF8 更改为FileFormat:=xlCSV，则它可以正常工作，但是由于缺少UTF-8，中文字符会作为问号保存在CSV 文件中。

如何保存 CSV 文件并在 VBA 中保留 UTF-8 编码？

【问题讨论】：

【解决方案1】：

Microsoft 似乎在过去一两个月向 Excel 添加了 CSV UTF8 保存选项。 User voice 说这是 9 个月前发布的，但我知道我在 5 月份没有这个选项。

我今天在代码中使用了 FileFormat:=xlCSVUTF8，它正确地保存了带有中文字符的 CSV 文件。我正在使用 Excel 2016 MSO (16.0.7726.1049) 32 位。

【讨论】：