Método Rows.Add (Word)
Devuelve un objeto Row que representa una fila agregada a una tabla.
Sintaxis
expresión. Agregar ( _BeforeRow_
)
expresión requerida. Variable que representa un objeto Rows .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
BeforeRow | Opcional | Variant | Objeto Row que representa la fila que aparecerá inmediatamente debajo de la nueva fila. |
Valor devuelto
Fila
Ejemplo:
En este ejemplo se inserta una nueva fila delante de la primera fila de la selección.
Sub AddARow()
If Selection.Information(wdWithInTable) = True Then
Selection.Rows.Add BeforeRow:=Selection.Rows(1)
End If
End Sub
En este ejemplo se agrega una fila a la primera tabla y, a continuación, se inserta el texto Cell en esa fila.
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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.