Shouldn't have to ask but..

[kirkm]

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

 

[Jacob Skaria]

= ChrW(9650)
= ChrW(9660)

If this post helps click Yes

 

[Eric G]

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

 

[kirkm]

= ChrW(9650)
= ChrW(9660)

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

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

 

[kirkm]

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