Método Rows.Add (Word)
Retorna um objeto Row que representa uma linha adicionada em uma tabela.
expressão. Adicionar ( _BeforeRow_
)
expressão Obrigatório. Uma variável que representa um objeto Rows .
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
BeforeRow | Opcional | Variantes | Um objeto Row que representa a linha que irá aparecer imediatamente abaixo da nova linha. |
Linha
Este exemplo insere uma nova linha antes da primeira linha da seleção.
Sub AddARow()
If Selection.Information(wdWithInTable) = True Then
Selection.Rows.Add BeforeRow:=Selection.Rows(1)
End If
End Sub
Este exemplo adiciona uma linha à primeira tabela e insere o texto "Cell" nessa linha.
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
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.