CharacterWidth Property Example

This example converts the current selection to half-width characters.

Selection.Range.CharacterWidth = wdWidthHalfWidth