Microsoft Office Forums - View Single Post - [Solved] Format multiple paragraphs differently

eduzs · 07-25-2019, 06:24 PM

Sorry, can't open files here.
You maybe better explain what you need.
If paragraphs are already selected (continuous selection), and you want to format them all at once, then use:

Code:

With Selection
    .Font.Bold = True
End With

If you want to format only the 1st paragraph of the selection (not need to be the 1st paragraph of the document):

Code:

With Selection.Paragraphs(1).Range
    .Font.Bold = True
 End With

If you want to format only the 1st paragraph of the activedocument (not the selection)

Code:

With Activedocument.Paragraphs(1).Range
    .Font.Size= 20
End With