Word VBA教程:TextColumns集合对象

   
PageSetup
TextColumns (TextColumn)

该对象为TextColumn对象组成的集合,这些元素对象代表文档或文档中某一节的所有栏。

使用 TextColumns集合

可用 TextColumns属性返回一个 TextColumns集合。下例将活动文档第一节的各栏格式设为均匀间隔,在各栏之间设置分割线。


With ActiveDocument.Sections(1).PageSetup.TextColumns
    .EvenlySpaced = True
    .LineBetween = True
End With

可用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号