You don't need to do anything regarding StoryRanges; what you need to do is:
• modify the Style of the paragraphs concerned, reducing the before/after spacing; and/or
• use Find/Replace process to delete empty paragraphs.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Hi, Paul;
Thank you very much. I will try what you suggested.
Since this is an Excel/Word combined situation, I was not sure which forum I should go. Sorry about it.
Thank you again.
Jason

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