Compartilhar via


Método Rows.Add (Word)

Retorna um objeto Row que representa uma linha adicionada em uma tabela.

Sintaxe

expressão. Adicionar ( _BeforeRow_ )

expressão Obrigatório. Uma variável que representa um objeto Rows .

Parâmetros

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.

Valor de retorno

Linha

Exemplo

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

Confira também

Objeto da coleção Rows

Suporte e comentários

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.