Word VBA教程:Columns集合对象

   
多种对象
Columns (Column)
多种对象

Column对象所组成的集合,该集合中的对象代表表格中的列。

使用 Columns集合

用 Columns属性可返回 Columns集合。下列示例显示活动文档的第一张表格的 Columns集合中 Column对象的个数。


MsgBox ActiveDocument.Tables(1).Columns.Count

下列示例创建一张三行六列的表格,并设置每列的底纹格式为递增百分比(越来越深)。


Set myTable = ActiveDocument.Tables.Add(Range:=Selection.Range, _
    NumRows:=3, NumColumns:=6)
For Each col In myTable.Columns
    col.Shading.Texture = 2 + i
    i = i + 1
Next col

Add方法可在表格中添加一列。下列示例为活动文档的第一张表格中添加一列,然后将列宽设置为相等。


If ActiveDocument.Tables.Count >= 1 Then
    Set myTable = ActiveDocument.Tables(1)
    myTable.Columns.Add BeforeColumn:=myTable.Columns(1)
    myTable.Columns.DistributeWidth
End If

用 Columns(index) 可返回单个 Column对象,其中 index 是索引序号。索引序号代表该列在 Columns集合中的位置(从左至右计算)。下列示例选定第一张表格的首列。


ActiveDocument.Tables(1).Columns(1).Select

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号