Вставка символа с VBA

Question

Я хотел бы вставить символ с 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 

Заранее благодарен! Amir

Answer 1

Это должно работать:

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