PageSetup.TextColumns Property (Word)
Returns a TextColumns collection that represents the set of text columns for the specified PageSetup object.
Syntax
expression .TextColumns
expression An expression that returns a PageSetup object.
Remarks
There will always be at least one text column in the collection. When you create new text columns, you are adding to a collection of one column.
For information about returning a single member of a collection, see Returning an Object from a Collection.
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