VBA Word2010 Unicode

Guten Tag,
ich versuche chinesische Zeichen über unicoe per VBA auf ein Word-Dokument zu bringen, aber es funktioniert nicht.
Wenn ich die Zeichenfolge direkt über die Tastatur eintippen
z.B. „4000 Alt-c“ dann klappt es. In VBA mache ich es mit
Application.ActiveDocument.Range.InsertAfter („4000%c“)
dann bekomme ich 4000. (Das Prozent-Zeichen wird laut Microsoft
verwendet um die gedrückte ALT-Taste zu representieren".
Danke im Voraus für die Hilfe,
Yannick

ich versuche chinesische Zeichen über unicoe per VBA auf ein
Word-Dokument zu bringen, aber es funktioniert nicht.
Wenn ich die Zeichenfolge direkt über die Tastatur eintippen
z.B. „4000 Alt-c“ dann klappt es. In VBA mache ich es mit
Application.ActiveDocument.Range.InsertAfter („4000%c“)

Hallo Yannick,

so?:

Sub tt()
Selection.TypeText Text:=ChrW(4000)
'oder
Selection.TypeText Text:=ChrW(&HFA0)
End Sub

Gruß
Reinhard