Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Возвращает или задает значение Variant , представляющее интервал (в пунктах) перед одним или несколькими абзацами. Для чтения и записи.
Синтаксис
expression. SpaceBefore
выражение Переменная, представляющая объект ParagraphFormat .
Возвращаемое значение
Variant
Пример
В этом примере интервал до и после третьего абзаца в первой фигуре первой страницы активной публикации устанавливается в 6 пунктов. В этом примере предполагается, что на первой странице активной публикации есть по крайней мере одна фигура.
Sub SetSpacingBeforeAfterParagraph()
With ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.Paragraphs(3).ParagraphFormat
.SpaceBefore = 6
.SpaceAfter = 6
End With
End Sub
В этом примере интервалы до и после всех абзацев в первой фигуре первой страницы активной публикации задаются в 6 пунктов. В этом примере предполагается, что на первой странице активной публикации есть по крайней мере одна фигура.
Sub SetSpacingBeforeAfterAllParagraph()
With ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.ParagraphFormat
.SpaceBefore = 12
.SpaceAfter = 6
End With
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.