Select any symbol and run the macro below over it. This will give a message box containing the ASCII code of the symbol.
Sub GetAsciiCode()
MsgBox "ASCII code is: " & AscW(Selection.Text)
End Sub
Select any symbol and run the macro below over it. This will give a message box containing the ASCII code of the symbol.
Sub GetAsciiCode()
MsgBox "ASCII code is: " & AscW(Selection.Text)
End Sub