Hello,

I need to write a macro that will insert one of the symbols into a cell
via a Macro (specifically the shape called 'Black Circle', which can be
found in the Arial font, in the subset Geometric Shapes).

I have tried recording a macro and doing this to see the code, but when
re-ran it only inserts a question mark.

It displays the character code of 25CF (in unicode), is there anyway I
can use this to insert the character?

Many thanks,

-Graham


--
GRussell31
------------------------------------------------------------------------
GRussell31's Profile: http://www.excelforum.com/member.php...o&userid=31138
View this thread: http://www.excelforum.com/showthread...hreadid=507999

Hi Graham,
25CF converted from hexadecimal to double yields 9679.
(2*16^3 + 5*16^2 + 12*16 + 9 = 9679)
Range("A1").Value = ChrW(9679) resulted in a small black circle.
Ken Johnson

Hi Ken,

Brilliant!

You have made my day so much easier!

Thanks,

-Graham


--
GRussell31
------------------------------------------------------------------------
GRussell31's Profile: http://www.excelforum.com/member.php...o&userid=31138
View this thread: http://www.excelforum.com/showthread...hreadid=507999

Hi Graham,
You're welcome, glad I could help you out. Thanks for the feedback.
Ken Johnson

I know this isn't important, but I just noticed a little mistake I made
in the working out of 25CF to 9679. The final result's correct, but the
+ 9 should have been + 15, since F = 15.
Ken Johnson

Here is an easier way:

? &H25CF
9679

so
d# = &H25CF
ActiveCell.value = chrw(d)

or

ActiveCell.Value = chrw(&H25CF)


--
Regards,
Tom Ogilvy


"Ken Johnson" wrote in message
ups.com...
I know this isn't important, but I just noticed a little mistake I made
in the working out of 25CF to 9679. The final result's correct, but the
+ 9 should have been + 15, since F = 15.
Ken Johnson

Hi Tom,
Thanks for that, this is the first time I've worked with Hexadecimal.
It's nice to get to know the little shortcuts.
Ken Johnson