Rows.Add (Word)

Devuelve un objeto Row que representa una fila agregada a una tabla.

Add (BeforeRow)

BeforeRow: Objeto Row que representa la fila que aparecerá inmediatamente debajo de la nueva fila.

Sub AddARow() 
 If Selection.Information(wdWithInTable) = True Then 
 Selection.Rows.Add BeforeRow:=Selection.Rows(1) 
 End If 
End Sub