Table.Cell procedure builder

Table.Cell (Word)

Returns a Cell object that represents a cell in a table.

Cell (Row, Column)

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

Arguments

The following arguments are required:

Row (Long) - The number of the row in the table to return. Can be an integer between 1 and the number of rows in the table.

Column (Long) - The number of the cell in the table to return. Can be an integer between 1 and the number of columns in the table.