不能在VBA中使用GBP (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

​

​

EDIT#1:

对我来说，这真的很酷。如果你想要摄氏度，使用ChrW(8451)：如果你想要华氏度，使用ChrW(8457)等等。