java导出无bom的csv中文乱码,如何在VBA(Excel)中使用没有BOM编码的UTF-8保存文本文件(CSV)?...

所以这是我最初的问题 . The answer 在我的问题下面,似乎是获得UTF-8(和没有BOM的UTF-8)编码的唯一解决方案是使用ADODB.Stream对象 .

主题行中我的新问题的答案将作为代码发布 .

我坐在这里尝试 Save Excel工作表作为带有VBA宏的 .CSV -file .

但是,我想知道我是否使用 ADODB / ADODB.Stream 或只是 .SaveAs Fileformat:=xlCSV 是否重要 . 我试过谷歌它,似乎我找不到答案的方法是"best" . 我需要它以逗号分隔,UTF-8和双引号(“”)作为文本标识符 .

使用 Fileformat:= 时,是否正确 SaveAs UTF-8,因为 xlCSV 没有使用该编码? YES, that is correct.

此代码将转换Excel工作表并将其保存为带有UTF-8的CSV文件,而不使用BOM编码 . 我在网站上找到了这个代码,所以我不会因此而受到赞扬 . CSV without BOM link

Sub CSVFileAsUTF8WithoutBOM()

Dim SrcRange As Range

Dim CurrRow As Range

Dim CurrCell As Range

Dim CurrTextStr As String

Dim ListSep As String

Dim FName As Variant

Dim UTFStream As Object

Dim BinaryStream As Object

' ask for file name and path

FName = Application.GetSaveAsFilenam

  • 1
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值