Range.CharacterStyle (Word)
Gibt einen Variant -Wert zurück, der die Formatvorlage darstellt, die zum Formatieren eines oder mehrerer Zeichen verwendet wird.
Dim strCharacterStyle As String
strCharacterStyle = ActiveDocument.Range.CharacterStyle