Returns or sets the width (in the current measurement units) in which Microsoft Word fits the text in the current selection or range. Read/write Single.
expression.FitTextWidth
expression Required. An expression that returns one of the objects in the Applies To list.
For more information on using Word with Asian languages, see Word features for Asian languages.
This example fits the current selection into a space five centimeters wide.
Selection.FitTextWidth = CentimetersToPoints(5)