1

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

前もって感謝します！アミール

4

1 に答える 1

1

これはうまくいくはずです：

Sub testver2()
    codec = Sheets("mapping").Cells(11, 1)
    Sheets("mapping").Cells(1, 10) = ChrW("&H" & codec)
End Sub
于 2013-10-02T22:31:13.743 に答える