Mac Excel使用VBA生成UTF-8

Question

是否可以在Excel 2016 for Mac中使用Visual Basic（VBA）生成UTF-8文件？ 我需要生成編碼的XML或TXT文件。

感謝

Answer 1

不是UTF-8，但UTF-16是什麼VBA內部使用，這樣你就可以直接傾倒字符串數據：

Dim fnum As Integer 
fnum = FreeFile() 
Open "utf16.txt" For Binary Access Write As fnum 

'write UTF-16 Byte Order Marker 
' 
Put #fnum, 1, &HFE 
Put #fnum, 2, &HFF 

printLineUtf16 fnum, "Olá Mundo!" 

Close #fnum 

Function printLineUtf16(fnum As Integer, str As String) 

    str = str & ChrW(10)   'append newline 

    Dim data() As Byte    'coerce string to bytes 
    data = str 

    Put #fnum, LOF(fnum) + 1, data 'append bytes to file 

End Function 

這應該在Excel的Mac 2011年和2016年的工作，並在Windows版本中。請注意，您將無法在編輯器中輸入Unicode字符串文字，只需簡單重音的拉丁字母（如上面的「á」），但單元格的Value中指定的字符串將保留爲Unicode。