Question

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