expression.Spacing
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
After this property has been set for a TextColumns object, the EvenlySpaced property is set to True. To return or set the spacing for a single text column when EvenlySpaced is False, use the SpaceAfter property of the TextColumn object.
Example
This example demonstrates two different character spacings at the beginning of the active document.
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
With myRange
.InsertAfter "Demonstration of no character spacing."
.InsertParagraphAfter
.InsertAfter "Demonstration of character spacing (1.5pt)."
.InsertParagraphAfter
End With
ActiveDocument.Paragraphs(2).Range.Font.Spacing = 1.5
This example sets the character spacing of the selected text to 2 points.
If Selection.Type = wdSelectionNormal Then
Selection.Font.Spacing = 2
Else
MsgBox "You need to select some text."
End If
This example sets the spacing between cells in the first table in the active document to nine points.
ActiveDocument.Tables(1).Spacing = 9
This example formats the active document to display text in two columns with 0.5 inch (36 points) spacing between the columns.
With ActiveDocument.PageSetup.TextColumns
.SetCount NumColumns:=2
.LineBetween = False
.EvenlySpaced = True
.Spacing = 36
End With