TextColumns Property

Applies To

PageSetup object.

Description

Returns or sets a TextColumns collection that represents the set of text columns for the specified PageSetup object. Read/write.

Remarks

There will always be at least one text column in the collection. When you create new text columns, you're adding to a collection of one column.

See Also

Add method (TextColumns collection), SetCount method, TextColumn object, TextColumns collection object.

Example

This example creates four evenly-spaced text columns that are applied to section two in the active document.

With ActiveDocument.Sections(2).PageSetup.TextColumns
    .SetCount NumColumns:=3
    .Add EvenlySpaced:=True
End With

This example creates a document with two text columns. The first column is 1.5 inches wide and the second is 3 inches wide.

Set myDoc = Documents.Add
With myDoc.PageSetup.TextColumns
    .SetCount NumColumns:=1
    .Add Width:=InchesToPoints(3)
End With
With myDoc.PageSetup.TextColumns(1)
    .Width = InchesToPoints(1.5)
    .SpaceAfter = InchesToPoints(0.5)
End With