Метод Rows.Add (Word)
Возвращает объект Row , представляющий строку, добавленную в таблицу.
expression. Добавить ( _BeforeRow_
)
выражение (обязательно). Переменная, представляющая объект 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 и обратная связь.