2013-10-02 167 views
1

我想用VBA插入符號。以下效果很好:用VBA插入符號

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

..但現在我想使字符代碼變量。它從映射表中獲取數字。我簡化了代碼並排除了映射部分,因爲這對我的問題並不重要。但是如果我在ChrW部分中使用'編解碼器',則會出現錯誤。編解碼器應該是634.任何人都知道如何正確編寫這部分vba代碼?

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

在此先感謝! 阿米爾

回答

1

這應該工作:

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

是這個工作!非常感謝! – Amir