Column 对象

         
Table
Columns (Column)
CellRange (Cell)

代表表格中的一列。Column 对象是 Columns 集合中的成员。Columns 集合包括表格中的所有列。

使用 Column 对象

使用 Columns(index) 可返回一个 Column 对象。Index 代表 Columns 集合中列的位置(通常是从左向右计算的;但 TableDirection 属性可变换计算方向)。本示例选择第二张幻灯片第五个形状的表格中的第一列。

ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Select

使用 Cell 对象可间接引用 Column 对象。本示例删除第一个单元格(第一行,第一列)中的文本,并插入新文本,然后将整列的宽度设置为 110 磅。

With ActivePresentation.Slides(2).Shapes(5).Table.Cell(1, 1)
    .Shape.TextFrame.TextRange.Delete
    .Shape.TextFrame.TextRange.Text = "Rooster"
    .Parent.Columns(1).Width = 110
End With

使用 Add 方法可向表格中添加一列。本示例在现有表格中创建一列,然后将列宽设置为 72 磅(1 英寸)。

With ActivePresentation.Slides(2).Shapes(5).Table
    .Columns.Add.Width = 72
End With

说明

使用 Cells 属性可修改 Column 对象中的个别单元格。本示例选择表格的第一列并对其下边框应用虚线样式。

ActiveWindow.Selection.ShapeRange.Table.Columns(1) _
    .Cells.Borders(ppBorderBottom).DashStyle = msoLineDash