VBA Macro Excel: How to read a Unicode character from Excel cell

Question

I am struggling to read a Unicode character back from a cell in VBA Excel.

Sub mySub()
    Cells(1, "A").Value = ChrW(10003)   ' Writes checkbox symbol to A1

    MsgBox Asc(Cells(1, "A").Value)     ' Output:  63 (questionmark symbol)
                                        ' Expected Output: 10003
End Sub

I need to read the Unicode character to see, if the checkbox symbol was modified by a user. I have no Idea how to compare a Unicode character with the cells value..

cyboashu · Accepted Answer · 2016-06-27 21:22:55Z

3

Sometimes all you need is second pair of eyes. :)

Sub mySub()
    Cells(1, "A").Value = ChrW(10004)   ' Writes checkbox symbol to A1

    'MsgBox Asc(Cells(1, "A").Value)     ' Output:  63 (questionmark symbol)
                                   ' Expected Output: 10003
    '/ Works! 
    MsgBox AscW(Cells(1, "A").Value2)    'Almost there. Use AscW instead of Asc
End Sub

answered Jun 27, 2016 at 21:22

cyboashu

10.5k2 gold badges32 silver badges48 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

VBA Macro Excel: How to read a Unicode character from Excel cell

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related