Word) (TextColumn 对象
代表一个文本栏。 TextColumn 对象是 TextColumns 集合的一个成员。 TextColumns 集合包括文档或文档的节中的所有列。
使用 TextColumns (索引),其中索引是索引号,返回单个 TextColumn 对象。 索引号代表 TextColumns 集合 (按从左到右计数) 中列的位置。
以下示例将活动文档中第一个文本栏的段后间距设置为 0.5 英寸。
ActiveDocument.PageSetup.TextColumns(1).SpaceAfter = _
InchesToPoints(0.5)
使用 Add 方法将列添加到的列的集合。 默认情况下, TextColumns 集合中没有一个文本栏。 下面的示例向活动文档添加 2.5 英寸宽。
ActiveDocument.PageSetup.TextColumns.Add _
Width:=InchesToPoints(2.5), _
Spacing:=InchesToPoints(0.5), EvenlySpaced:=False
使用 SetCount 方法来排列成列的文本。 下面的示例将活动文档中的文字排列成三列。
ActiveDocument.PageSetup.TextColumns.SetCount NumColumns:=3
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。