Hi, Paul;
I made the following code and it works:

With objWordFile.ActiveDocument
Dim myParagraphs As Paragraphs
Dim myparagraph As Paragraph
Set myParagraphs = .Paragraphs
For Each myparagraph In myParagraphs
myparagraph.Range.ParagraphFormat.SpaceAfter = 0
Next
End With



Thank you again for your guidance.
Jason