SpaceBefore Property [Publisher 2003 VBA Language Reference]
Returns or sets a Variant that represents the amount of spacing (in points) before one or more paragraphs. Read/write.
expression.SpaceBefore
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example sets the spacing before and after the third paragraph in the first shape on the first page of the active publication to 6 points. This example assumes there is at least one shape on the first page of the active publication.
Sub SetSpacingBeforeAfterParagraph()
With ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.Paragraphs(3).ParagraphFormat
.SpaceBefore = 6
.SpaceAfter = 6
End With
End Sub
This example sets spacing before and after all paragraphs in the first shape on the first page of the active publication to 6 points. This example assumes there is at least one shape on the first page of the active publication.
Sub SetSpacingBeforeAfterAllParagraph()
With ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.ParagraphFormat
.SpaceBefore = 12
.SpaceAfter = 6
End With
End Sub
Applies to | ParagraphFormat Object