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 支援與意見反應。