Cell 方法

       

返回一个 Cell 对象,该对象代表表格中的一个单元格。

expression.Cell(Row, Column)

expression   必需。该表达式返回一个 Table 对象。

Row   Long 类型,必需。指返回的表格行数。可以是介于 1 和表格行数之间的任意整数。

Column   Long 类型,必需。指返回的表格单元格数目。可以是介于 1 和表格列数之间的任意整数。

示例

本示例在新文档中创建一个 3x3 表格,并在表格的第一个和最后一个单元格中插入文本。

Dim docNew As Document
Dim tableNew As Table

Set docNew = Documents.Add
Set tableNew = docNew.Tables.Add(Selection.Range, 3, 3)

With tableNew
    .Cell(1,1).Range.InsertAfter "First cell"
    .Cell(tableNew.Rows.Count, _
        tableNew.Columns.Count).Range.InsertAfter "Last Cell"
End With

本示例删除活动文档的第一个表格中的第一个单元格。

If ActiveDocument.Tables.Count >= 1 Then
    ActiveDocument.Tables(1).Cell(1, 1).Delete
End If