Word VBA教程:TextColumn对象

   
PageSetup
TextColumns (TextColumn)

该对象代表一个单独的文本栏。TextColumn对象为TextColumns集合的一个成员。TextColumns集合包含了文档或文档中一节的所有栏。

使用 TextColumn对象

可用 TextColumns(index) 返回一个 TextColumns对象,其中 index 为索引号。索引号代表 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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号