TextColumns オブジェクト (Word)
文書内のテキストのすべての列、またはドキュメントのセクションを表す TextColumn オブジェクトのコレクションです。
TextColumns プロパティを使用して、 TextColumns コレクションを取得します。 次の使用例は、均等になるよう、列の間の線で作業中の文書の最初のセクション内の列を書式設定します。
With ActiveDocument.Sections(1).PageSetup.TextColumns
.EvenlySpaced = True
.LineBetween = True
End With
Add メソッドを使用して、段組みのコレクションに段を追加します。 既定では、 TextColumns コレクションには 1 つの段が含まれます。 次の使用例は、作業中の文書に幅 2.5 インチ (63.5 mm) の段を追加します。
ActiveDocument.PageSetup.TextColumns.Add _
Width:=InchesToPoints(2.5), _
Spacing:=InchesToPoints(0.5), EvenlySpaced:=False
SetCount メソッドを使用して、文字列を段組みにします。 次の使用例は、作業中の文書の文字列を 3 段の段組みにします。
ActiveDocument.PageSetup.TextColumns.SetCount NumColumns:=3
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。