共用方式為


Table.Rows 屬性 (Publisher)

會傳回 Rows 集合,代表範圍、選取範圍或表格中的所有表格列。

語法

運算式

表達 代表 Table 物件的變數。

註解

如需傳回集合中單一成員的資訊,請參閱 從集合傳回物件

範例

本範例輸入指定表格中所有偶數列的填滿格式,並清除所有奇數列的填滿格式。 本範例假設指定的圖案是表格,而不是另一種類型的圖案。

Sub FillCellsByRow() 
 Dim shpTable As Shape 
 Dim rowTable As Row 
 Dim celTable As Cell 
 
 Set shpTable = ActiveDocument.Pages(1).Shapes _ 
 .AddTable(NumRows:=5, NumColumns:=5, Left:=100, _ 
 Top:=100, Width:=100, Height:=12) 
 For Each rowTable In shpTable.Table.Rows 
 For Each celTable In rowTable.Cells 
 If celTable.Row Mod 2 = 0 Then 
 celTable.Fill.ForeColor.RGB = RGB _ 
 (Red:=180, Green:=180, Blue:=180) 
 Else 
 celTable.Fill.ForeColor.RGB = RGB _ 
 (Red:=255, Green:=255, Blue:=255) 
 End If 
 Next celTable 
 Next rowTable 
End Sub

支援和意見反應

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