Arranges text into the specified number of text columns.
Note You can also use the Add method of the TextColumns object to add a single column to the TextColumns collection.
expression.SetCount(NumColumns)
expression Required. An expression that returns a TextColumns object.
NumColumns Required Long. The number of columns the text is to be arranged into.
Example
This example arranges the text in the active document into two columns of equal width.
ActiveDocument.PageSetup.TextColumns.SetCount NumColumns:=2
This example arranges the text in the first section of Brochure.doc into three columns of equal width.
Documents("Brochure.doc").Sections(1) _
.PageSetup.TextColumns.SetCount NumColumns:=3