使用VBA插入符号

时间:2013-10-02 22:23:30

标签: excel vba excel-vba symbols

我想在VBA中插入符号。以下效果很好:

Sub testver()    
Sheets("mapping").Cells(1, 10) = ChrW(&H634)
end sub

..但现在我想制作字符代码变量。它从映射表中获取数字。我简化了代码并排除了映射部分,因为这对我的问题并不重要。但是如果我在ChrW部分使用'codec',我会收到错误。编解码器应该是634.任何人都知道如何正确编写这部分vba代码?

Sub testver2()
codec = Sheets("mapping").Cells(11, 1)
Sheets("mapping").Cells(1, 10) = ChrW(&H"codec")
end sub

提前致谢! 阿米尔

1 个答案:

答案 0 :(得分:1)

这应该有效:

Sub testver2()
    codec = Sheets("mapping").Cells(11, 1)
    Sheets("mapping").Cells(1, 10) = ChrW("&H" & codec)
End Sub