Use Chr(). For example:

Sub dural()
ActiveCell.Font.Name = "Arial Unicode MS"
ActiveCell.Value = ChrW(8457)
End Sub

will put a degrees Fahrenheit symbol in a cell.




--
Gary''s Student - gsnu200909


"GadyC" wrote:

I wrote a macro - xla.
it returns manipulated and translated strings.
after passing to win7 i get the output in wrong language code, probably
unicode problem.

how can i assign a unoicode string into a varialble?

thanks in advance