Selection.InsertRows (Word)

Insere o número especificado de novas linhas acima da linha que contém a seleção. Se a seleção não estiver em uma tabela, ocorrerá um erro.

Você também pode inserir linhas usando o método Add do objeto Rows.

InsertRows (NumRows)

NumRows: O número de linhas a ser adicionado.


If Selection.Information(wdWithInTable) = True Then 
 Selection.InsertRows NumRows:=2 
 Selection.Borders.Enable =False 
End If