Paragraphs
Looping through all the paragraphs and changing the space setting before the paragraph
Dim parCount As Paragraph
For Each parCount In ActiveDocument.Paragraphs
If parCount.SpaceBefore = 12 Then parCount.SpaceBefore = 6
Next parCount
Dim parCount As Paragraph
For Each parCount In ActiveDocument.Paragraphs
If parCount.SpaceBefore = 12 Then parCount.SpaceBefore = 6
Next parCount
Comments
Post a Comment