Selection.CopyFormat (Word)

Copia a formatação de caractere do primeiro caractere do texto selecionado.

Se uma marca de parágrafo estiver selecionada, o Word copiará a formatação do parágrafo além da formatação de caractere. Você pode aplicar a formatação copiada a outra seleção usando o método PasteFormat .

ActiveDocument.Paragraphs(1).Range.Select 
Selection.CopyFormat 
ActiveDocument.Paragraphs(2).Range.Select 
Selection.PasteFormat