如何将 UTF-8 放入 VBA答案

【问题标题】：How to put UTF-8 in VBA如何将 UTF-8 放入 VBA
【发布时间】：2018-09-23 21:09:12
【问题描述】：

是否可以在 Excel 2013 的代码窗格中放置 unicode 字符？

像这样：

Select Case Work(str)
   Case "◊ Engineering", "◊ Woodworking", "◊ Technician"
   'Do Something
End Select

【问题讨论】：

注意：UTF-8 是 Unicode 字符集的几种字符编码之一。另一个是 UTF-16。 Excel 和 VBA 本机使用 UTF-16（自 1990 年代以来）。（但不幸的是，正如您所发现的，VBA 编辑器不使用 Unicode）。因此，这个问题与 UTF-8 无关。
这能回答你的问题吗？ How to type Unicode currency character in Visual Basic Editor

【解决方案1】：

您可以为此使用ChrW 函数：

Select Case Work(str)
   Case ChrW(9674) & " Engineering", ChrW(9674) & " Woodworking", ChrW(9674) & " Technician"
   'Do Something
End Select

您可以对此进行测试，例如如下：

Sheet1.[A1].Value = ChrW(9674)

这会将您的角色放入单元格 A1 的 Sheet1 中

【讨论】：

ChrW CharCode 参数是一个 Long，用于标识一个字符，但不允许大于 65535 的值（十六进制值 &HFFFF）。您可以在Get UniCode characters with CharCode greater hex FFFF 找到克服此限制的六种系统方法

【解决方案2】：

您可以使用 Chr 或 ChrW 函数。

Chr 的有效范围是 0 到 255，ChrW 的有效范围是 -32768 到 65535。

例子：

ChrW(9608)

或

ChrW(&H2588)

&H 前言说 2588 是一个十六进制数，这就是您在查看charmap 时发现的。

【讨论】：