使用VBA从Excel电子表格中提取unicode文本

我们从Excel电子表格中的文本生成HTML。 该文本包含国际字符的Unicode代表。 当我们使用VBA来提取文本并将其输出到文件时，它被写为ANSI（ASCII）。 有没有办法使用VBA保存Unicode代表？

布鲁斯

Answer 1

VBA中的默认文件写入机制是ANSI（ 就像VB6一样 ）。

你需要使用不同的方法。 一种方法是使用FileSystemObject 。

Dim fso As Object, MyFile As Object Set fso = CreateObject("Scripting.FileSystemObject") Set MyFile = fso.CreateTextFile("c:\testfile.txt", False,True) 'Unicode=True' MyFile.WriteLine("This is a test.") MyFile.Close