Word) (Cell.Column 屬性
會傳回代表包含指定之儲存格的表格欄的 Column 物件。 唯讀。
運算式。列
需要 expression。 代表 'Cell' 物件的變數。
本範例會建立一個 3x5 的表格,然後將陰影效果套用至偶數欄位。
Dim tableNew As Table
Dim cellLoop As Cell
Selection.Collapse Direction:=wdCollapseStart
Set tableNew = _
ActiveDocument.Tables.Add(Range:=Selection.Range, _
NumRows:=3, NumColumns:=5)
For Each cellLoop In tableNew.Rows(1).Cells
If cellLoop.ColumnIndex Mod 2 = 0 Then
cellLoop.Column.Shading.Texture = wdTexture10Percent
End If
Next cellLoop
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。