Excel VBA - export to UTF-8
来源:互联网 发布:0基础学c语言 编辑:程序博客网 时间:2024/06/05 01:14
Dim filePath As String
Dim fileName As String
Dim charToEncode As String
Dim encodingType As String
Dim success As Boolean
Dim rngArray() As Variant
filePath = "C:\"
fileName = "testUnicode.csv"
encodingType = "utf-8"
Dim startRow As Long
Dim endRow As Long
startRow = 2
endRow = Range("A65536").End(xlUp).Row
Set adodbStream = CreateObject("ADODB.Stream")
With adodbStream
.Type = 2 'Stream type
.Charset = "UTF-8"
'or utf-16 etc
.Open
.WriteText Sheet1.Cells(i, 1).Value
.SaveToFile filePath & fileName, 2 'Save binary data To disk
Dim fileName As String
Dim charToEncode As String
Dim encodingType As String
Dim success As Boolean
Dim rngArray() As Variant
filePath = "C:\"
fileName = "testUnicode.csv"
encodingType = "utf-8"
Dim startRow As Long
Dim endRow As Long
startRow = 2
endRow = Range("A65536").End(xlUp).Row
Set adodbStream = CreateObject("ADODB.Stream")
With adodbStream
.Type = 2 'Stream type
.Charset = "UTF-8"
'or utf-16 etc
.Open
.WriteText Sheet1.Cells(i, 1).Value
.SaveToFile filePath & fileName, 2 'Save binary data To disk
End With
end sub
- Excel VBA - export to UTF-8
- Export DataSets to Excel...
- export to excel
- Export GridView to Excel
- Export to excel
- Export to Excel
- EXCEL export to TXT
- Export to excel
- vba excel to word
- Proceduce Export Table To Excel
- ASP:Export to Excel (1)
- ASP: Export to Excel (2)
- Export to Excel user Control
- Export to Excel from Repeater
- excel export to latex table
- VBA 输出utf-8格式文件
- export grid to excel fast and wyswyg
- Export ASP.NET DataGrid To Excel
- RQNOJ 601(区间覆盖问题)
- How Do I Convert an Integer to a String in Excel VBA
- Spring调度任务cronjob 精确指定任务的运行时间
- js中 NaN、 null 及 undefined 的区别
- little-endian and big endian
- Excel VBA - export to UTF-8
- php脚本(功能发短信;技术mongodb队列,锁文件。linux运行)
- 关于C++ const 的全面总结
- Javascript的前台与后台
- 利用Java控制MySql数据库的导入和导出
- Android 定时器的三种实现
- [转]C/C++启动函数
- MapKit and Text Input
- myeclipse10激活方法