Cells 属性

返回 CellRange 集合，它代表表格列或行中的单元格。只读。

有关返回集合中单个元素的详细信息，请参阅返回集合中的对象。

示例

本示例新建一个演示文稿，接着为其添加一张幻灯片，然后在幻灯片上插入一个 3x3 的表格，最后为表格中的每个单元格指定列号和行号。

Dim i As Integer
Dim j As Integer
With Presentations.Add
    .Slides.Add(1, ppLayoutBlank).Shapes.AddTable(3, 3).Select
    Set myTable = .Slides(1).Shapes(1).Table
    For i = 1 To myTable.Columns.Count
        For j = 1 To myTable.Columns(i).Cells.Count
            myTable.Columns(i).Cells(j).Shape.TextFrame _
                .TextRange.Text = "col. " & i & "row " & j
        Next j
    Next i
End With