Rows.Add 方法 (Word)
傳回 Row 物件,表示加入至表格的列。
運算式。新增 ( _BeforeRow_
)
需要 expression。 代表 Rows 物件的 變數。
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
BeforeRow | 選用 | Variant | Row 物件,表示將會緊接著顯示在新列底下的列。 |
列
這則範例會在選取項目中的第一列前面插入新列。
Sub AddARow()
If Selection.Information(wdWithInTable) = True Then
Selection.Rows.Add BeforeRow:=Selection.Rows(1)
End If
End Sub
這則範例會將一列加入至第一個表格,然後將文字 Cell 插入此列。
Sub CountCells()
Dim tblNew As Table
Dim rowNew As Row
Dim celTable As Cell
Dim intCount As Integer
intCount = 1
Set tblNew = ActiveDocument.Tables(1)
Set rowNew = tblNew.Rows.Add(BeforeRow:=tblNew.Rows(1))
For Each celTable In rowNew.Cells
celTable.Range.InsertAfter Text:="Cell " & intCount
intCount = intCount + 1
Next celTable
End Sub
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。