How do you put the bullet Character (Alt 30) into a cell with code?

I recorded a macro and ended with

Range("T1").Select
ActiveCell.FormulaR1C1 = "?"

but running this invokes
Run-time error '1004':
Select method of Range class failed

1 hour + Googling and still looking !

Thanks - Kirk

= ChrW(9650)
= ChrW(9660)

If this post helps click Yes
---------------
Jacob Skaria


"kirkm" wrote:


How do you put the bullet Character (Alt 30) into a cell with code?

I recorded a macro and ended with

Range("T1").Select
ActiveCell.FormulaR1C1 = "?"

but running this invokes
Run-time error '1004':
Select method of Range class failed

1 hour + Googling and still looking !

Thanks - Kirk

Actually, that part of your code worked for me, although it shows a "?" and
not the bullet symbol. Perhaps something else in the recorded macro needs
fixing?

This will stick a bullet in your cell:

ActiveCell.FormulaR1C1 = "€¢"

Eric

On Tue, 5 May 2009 04:15:01 -0700, Jacob Skaria
wrote:

= ChrW(9650)
= ChrW(9660)

If this post helps click Yes
---------------

You bet, thank you! Worked spot on...

On Tue, 5 May 2009 05:46:09 -0700, Eric G
wrote:

Actually, that part of your code worked for me, although it shows a "?" and
not the bullet symbol. Perhaps something else in the recorded macro needs
fixing?

This will stick a bullet in your cell:

ActiveCell.FormulaR1C1 = "•"

Thanks Eric... it's a vb routine and I'm not sure how to set
an Active Cell with that. Jacobs CHRW method is doing the job.
I also had "?" everywhere while testing... and is what Alt-30 gives
you when it won't give you what you want. And where Alt-0151 (em)
or Alt-156(pound) does give you what you want. Ain't computers
marvellous!

Cheers - Kirk