不能在VBA中使用GBP（£）符号

Question

我有英文版的Excel和波兰语区域设置。我尝试制作一个代码，它将在数字值之前使用井号符号格式化单元格。

不幸的是，当我将符号粘贴到VBA窗口时，它会转换为“L”。宏录制器还将以这种方式格式化的单元格记录为“L”。 Chr（163）返回“Ł”。

更改系统语言设置，本地化设置或键盘设置无效。只有在将区域设置（需要PC重启）更改为英语（英国）后才能正常工作。有没有办法在不改变区域设置的情况下使用这个符号？

Answer 1

如果您想通过 VBA 将符号应用于格式，请尝试：

Sub Serling()
    Const g = "General"
    dq = Chr(34)
    sterl = " " & ChrW(163)
    s = g & dq & sterl & dq
    Selection.NumberFormat = s
    Selection.Font.Name = "Arial Unicode MS"
End Sub

修改＃1：

对我而言，这真的很酷。如果你想要摄氏度，请使用ChrW（8451）：如果你想要华氏度，请使用ChrW（8457）等。