共用方式為


Word) (儲存格物件

代表單一表格儲存格。 Cell 物件會 儲存格 的成員 集合。 Cells 集合代表指定物件中的所有儲存格。

註解

使用 單元 格 (列、資料行) ,其中 row 是列編號,而 column 是欄號 ,或是 Cells (索 ) ,其中 index 是索引編號,可以傳回 Cell 物件。 下列範例會將網底套用至第一列的第二個儲存格。

Set myCell = ActiveDocument.Tables(1).Cell(Row:=1, Column:=2) 
myCell.Shading.Texture = wdTexture20Percent

下列範例會將網底套用至第一列中的第一個儲存格。

ActiveDocument.Tables(1).Rows(1).Cells(1).Shading _ 
 .Texture = wdTexture20Percent

使用 [ 新增 若要新增至 Cells 集合的 Cell 物件的方法。 您也可以使用 InsertCellsSelection 物件插入新儲存格的方法。 下列範例會在 myTable前面的第一個儲存格的儲存格。

Set myTable = ActiveDocument.Tables(1) 
myTable.Range.Cells.Add BeforeCell:=myTable.Cell(1, 1)

下列範例會設定 myRange ) (範圍,以參考第一個資料表中的前兩個儲存格。 在設定此範圍後,這些儲存格就會透過 Merge 方法合併。

Set myTable = ActiveDocument.Tables(1) 
Set myRange = ActiveDocument.Range(myTable.Cell(1, 1) _ 
 .Range.Start, myTable.Cell(1, 2).Range.End) 
myRange.Cells.Merge

備註

您可以使用 Add 方法搭配 RowsColumns 集合來加入一列或一欄儲存格。

使用 資訊 屬性與 Selection 物件來傳回目前的列和欄數。 下列範例會變更選取範圍內的第一個儲存格的寬度,然後顯示 [儲存格的列數和欄數。

If Selection.Information(wdWithInTable) = True Then 
 With Selection 
 .Cells(1).Width = 22 
 MsgBox "Cell " & .Information(wdStartOfRangeRowNumber) _ 
 & "," & .Information(wdStartOfRangeColumnNumber) 
 End With 
End If

請參閱

Word 物件模型參考資料

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應