OfficeType

VBA~WorksheetFunction.Unicodeメソッド~Excel

VBAで文字に対応したUNICODE番号を取得したい場合はWorksheetFunction.Unicodeメソッドを使います。

書き方

WorksheetFunction.Unicode(文字)

例として下の画像において下のコードを実行するとA列の文字に対応したUNICODE番号がB列に表示されます。

image-01

Sub test1()

Range("B2") = WorksheetFunction.IsLogical(Range("A2"))
Range("B3") = WorksheetFunction.IsLogical(Range("A3"))
Range("B4") = WorksheetFunction.IsLogical(Range("A4"))
Range("B5") = WorksheetFunction.IsLogical(Range("A5"))

End Sub

image-02