使用 Column 对象，使用 Columns(index) 可返回一个 Column 对象。Index 代表 Columns 集合中列的位置（通常是从左向右计算的；但 TableDirection 属性可变换计算方向）。本示例选择第二张幻灯片第五个形状的表格中的第一列。
ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Select
使用 Cell 对象可间接引用 Column 对象。本示例删除第一个单元格（第一行，第一列）中的文本，并插入新文本，然后将整列的宽度设置为 110 磅。
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 对象中的个别单元格。本示例选择表格的第一列并对其下边框应用虚线样式。
.Selection.ShapeRange.Table.Columns(1) _
.Cells.Borders(ppBorderBottom).DashStyle = msoLineDash