将西里尔字符读取到VBA变量

Question

我想从包含俄语字符的Excel单元格中读取值到VBA字符串变量或变量变量（对于矩阵）。假设在A1单元格中我们有俄文字符（正确显示）。

当我将其视为MyString=Range("A1").Value时，变量MyString读为?????????????????????????????????150???50

Simmilarly这个测试失败了：

? Activecell.Value

当我使用以下代码将字符串转储到文件时：

Dim myFile As String
Dim N As Integer
N = FreeFile()
myFile = "C:\MyFileName.txt"
Open myFile For Output As #N
Print #N, SQL
Close #N
Debug.Print myFile

我得到?????