PasteFormat Method Example

This example copies the paragraph and character formatting from the first paragraph in the selection to the next paragraph in the selection.

With Selection
    .Paragraphs(1).Range.Select
    .CopyFormat
    .Paragraphs(1).Next.Range.Select
    .PasteFormat
End With

This example collapses the selection and copies the character formatting to the next word.

With Selection
    .Collapse Direction:=wdCollapseStart
    .CopyFormat
    .Next(Unit:=wdWord, Count:=1).Select
    .PasteFormat
End With