Selection.PasteAsNestedTable (Word)

Cola uma célula ou um grupo de células como uma tabela aninhada dentro da seleção.

Você só pode usar PasteAsNestedTable se a área de transferência contiver uma célula ou um grupo de células e o intervalo selecionado for uma célula ou um grupo de células no documento atual.

ActiveDocument.Tables(1).Rows(1).Cells(3).Range _ 
 .PasteAsNestedTable