不能在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)等.