find the Unicode value of a symbol

As described here, Aula Nerd often wants to know the Unicode value of a symbol. Pressing Alt + X after the symbol will give the Unicode (hex) value. The macro below will give the Unicode (decimal) value – just highlight the symbol you want then click the macro:

Sub GetUnicodeDecimal()

MsgBox "Unicode (decimal) is: " & AscW(Selection.Text)

End Sub

If you then want to use the symbol in a macro you use this line of code:

Selection.InsertSymbol Font:=”Arial”, CharacterNumber:=916, Unicode:=True

Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s

%d bloggers like this: