Insert Unicode character into word 2003 macro

[joey1211]

I am trying to rewrite a macro due to a change of font and insert a 'w' and a 'y' with accents on them.

Here's the code. The 'ŵ' and 'ŷ' come out as '??' at the bottom of the code. Is it possible to paste Unicode into macros? The 'ã' and 'ñ' characters we remapped in the old font to w and y. We are now changing back to Times New Roman.

WordBasic.Insert "ã"
Case "y"
WordBasic.Insert "ñ"
Case "W"
WordBasic.Insert "Ã"
Case "Y"
WordBasic.Insert "Ñ"
Case Else
Rem
End Select
End Sub

??​

This probably makes no sense and will try and reword it as replies come in

Cheers

 

[joey1211]

Quoted from another website
"Just a comment: No need for Hex2Dec. VBA "understands" hex literals. You enter them with the &H prefix, i.e.

.Value = ChrW(&H06DE)"


Amended code

Case "w"
WordBasic.Insert ChrW(x175)
Case "y"
WordBasic.Insert "ñ"
Case "W"
WordBasic.Insert "Ã"
Case "Y"
WordBasic.Insert "Ñ"​

This code puts in a star. Anyone know the hex code for LATIN SMALL LETTER W WITH CIRCUMFLEX' (U+0175)

 

[joey1211]

Hopeful bump

 

[tntcoder]

http://www.tamasoft.co.jp/en/general-info/unicode.html can you see it there? You should be able to get the hex representation from the table.

 

[joey1211]

ok so, ŵ is in row 0160 and column 15. The hexcode therefore is...

Neither 016015 nor 150160 work

 

[csmager]

ChrW(&H175) or ChrW(373) - both work for me.

 

[joey1211]

Both of these give ŵ? So how do I translate the table row and column numbers into hex?

 

[csmager]

Both of these give ŵ? So how do I translate the table row and column numbers into hex?

You don't - it doesn't seem to apply.

The codes I used I got from the symbol editor, as you did (Hex 0175, as you said in Post #2). 373 is just the decimal equivalent (use calc).

 

[joey1211]

Any ideas on why the code changes the character from 'Times New Roman' to 'Tahoma'?