创建一个宏，将Excel文件转换为UTF-8格式的CSV文件。

下面是一个Excel VBA宏的示例，可将活动工作簿中的数据另存为UTF-8格式的CSV文件。

Sub ConvertToCSVUTF8() '设置CSV文件的路径和文件名 fileName = ThisWorkbook.Path & "" & ThisWorkbook.Name fileName = Left(fileName, InStrRev(fileName, ".")) & "csv"

'将数据保存为CSV文件
With ActiveWorkbook
    .SaveAs fileName, xlCSVUTF8
    .Close False
End With

End Sub

在此示例中，使用SaveAs方法将工作簿保存为CSV文件并指定xlCSVUTF8格式，该格式表示CSV文件应以UTF-8编码保存。这个宏可以通过将其添加到Excel的宏模块来使用。

请注意，在保存数据之前，为确保CSV文件的数据格式正确，您需要按照以下步骤操作：

1. 删除Excel表格中的任何不需要的数据或列；
2. 确保表格中的数据都在合适的列中；
3. 去除任何单元格的数据格式化；
4. 将数据列中的任何空格或者换行替换/移除；
5. 手动使用“另存为”选项保存文件，以确认数据的输出正确。
6. 运行宏。

安装此宏后，您可以在Excel的“开发人员”选项卡找到此宏。在启动宏后，CSV文件将在与Excel文件相同的目录下创建。