Hi Bernie,

This worked perfectly. I looked all over and saw the other ChrW in several
places, but it sure did not work. Did you find this on line? Could you share
the reliable source that you used, since mine was wrong?

Thanks Again,
David

"Bernie Deitrick" wrote:

David,

948 is lower case delta, ChrW(916) is upper case (though I'm sure there are
others as well, such as 8710).

ActiveCell.Offset(1, 5).Value = "7Day" & ChrW(916)

HTH,
Bernie
MS Excel MVP


"David" wrote in message
...
Sorry,

I did some other research and found:
ActiveCell.Offset(1, 5).Value = "7Day" & ChrW(948)
but the above does not give me Delta, but some other character. Any ideas,
it is simplier to use, if it would work correctly.

Thanks,
David

"David" wrote:

Hi,
This worked, thank you. I got it to work with out the MyText

Sub dk()
Range("B2") = "7DayD"
Range("B2").Characters(5, 5).Font.Name = "Symbol"
End Sub

Thanks Again,
David

"JLGWhiz" wrote:

Try this:

Sub dk()
MyText = "7DayD"
Range("B2") = MyText
Range("B2").Characters(5, 5).Font.Name = "Symbol"
End Sub



"David" wrote in message
...
Hi Group,

I have a cell where I am trying to put in some text:
ActiveCell.Offset(1, 5).Value = "7Day?"

but I am unable to get the ? character to work. Possibly I have to
use
unicode?

Thanks,
David


.


.