Alt Code display under VBA

[dcanham]

I'm not sure if it is possible, but is there a way to display the 'alt' set of graphic symbols in a cell using VBA? Like holding down the alt key and hitting '3' on the numeric keypad will give you a heart symbol. I can cause the symbols to display in the cell if I type it manually, just looking for a way to do it under program control. Thanks for any help.

-Dan

 

[Colo]

Hi Dan,

Since I'm using a Japanese version, holding down the alt key and hitting '3' doesn't work.
But I think there is a way to know the code of the heart symbol.
(I couldn't test it , so this is what I just guessed.)

Assume heart symbol is "h"

In the immediate window, type the following code then press Enter will return 104.
It's the character code of h.

Debug.Print Asc("h")

So you can describe the text or heart symbol with using this character code like this.

Debug.Print Chr("104")

If this dosn't work, an appropriate Font should be set.