ParagraphFormat.SpaceBefore プロパティ (Publisher)

1 つ以上の段落の前の間隔 (ポイント単位) を表すバリアント型 (Variant) の値を取得または設定します。 値の取得と設定が可能です。

構文

SpaceBefore

ParagraphFormat オブジェクトを表す変数。

戻り値

バリアント型

次の使用例は、作業中の文書の最初のページの最初の図形で、3 番目の段落の前後の間隔を 6 ポイントに設定します。 この使用例では、作業中の文書の最初のページに図形が少なくとも 1 つ存在することを前提としています。

Sub SetSpacingBeforeAfterParagraph() 
 With ActiveDocument.Pages(1).Shapes(1).TextFrame _ 
 .TextRange.Paragraphs(3).ParagraphFormat 
 .SpaceBefore = 6 
 .SpaceAfter = 6 
 End With 
End Sub

次の使用例は、作業中の文書の先頭ページの最初の図形で、すべての段落の前に 12 ポイント、後に 6 ポイントの間隔を設定します。 この使用例では、作業中の文書の最初のページに図形が少なくとも 1 つ存在することを前提としています。

Sub SetSpacingBeforeAfterAllParagraph() 
 With ActiveDocument.Pages(1).Shapes(1).TextFrame _ 
 .TextRange.ParagraphFormat 
 .SpaceBefore = 12 
 .SpaceAfter = 6 
 End With 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。