Range.Style (Word)

Returns or sets the style for the specified style. Read/write Variant.

To set this property, specify the local name of the style, an integer, a WdBuiltinStyle constant, or an object that represents the style. When you return the style for a range that includes more than one style, only the first character or paragraph style is returned.

For Each c in Selection.Characters 
 MsgBox c.Style 
Next c