utf-8 и OpenTextFile

[devel]

Есть файл в кодировке utf-8 .

Когда открываю его

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile(sFilePath, ForReading, False, 0)

sFileText = f.ReadAll()

кириллица читается как

измерения:

Кто знает, как на VBA читать и писать файлы в кодировке UTF-8?

[alibek]

В данном случае указывай кодировку при открытии или используй Stream.