ParagraphFormat オブジェクト (Publisher)

段落のすべての書式を表します。

注釈

TextStyle.ParagraphFormat プロパティを使用して、段落または段落の ParagraphFormat オブジェクトを取得します。 ParagraphFormat プロパティは、選択範囲、指定範囲、またはスタイルの ParagraphFormat オブジェクトを返します。

Duplicate メソッドを使用して、既存の ParagraphFormat オブジェクトをコピーします。

例

次の使用例は、カーソル位置の段落を中央揃えにします。 この使用例では、最初の図形はテキスト ボックスであり、他の種類の図形ではないことを前提としています。

Sub CenterParagraph() 
 Selection.TextRange.ParagraphFormat _ 
 .Alignment = pbParagraphAlignmentCenter 
End Sub

次の使用例は、作業中の文書内にある最初の段落の段落書式を複製し、その書式を変数に格納します。 この使用例では、既存の ParagraphFormat オブジェクトを複製し、左インデントを 1 インチに設定した後、新しいテキスト ボックスを作成し、そこにテキストを挿入して、複製した段落書式をそのテキストに適用します。

Sub DuplicateParagraphFormating() 
 Dim pfmtDup As ParagraphFormat 
 
 Set pfmtDup = ActiveDocument.Pages(1).Shapes(1).TextFrame _ 
 .TextRange.ParagraphFormat.Duplicate 
 
 pfmtDup.LeftIndent = Application.InchesToPoints(1) 
 
 With ActiveDocument.Pages.Add(Count:=1, After:=1) 
 With .Shapes.AddTextbox(pbTextOrientationHorizontal, _ 
 Left:=72, Top:=72, Width:=200, Height:=100) 
 With .TextFrame.TextRange 
 .Text = "This is a test of how to use " & _ 
 "the ParagraphFormat object." 
 .ParagraphFormat = pfmtDup 
 End With 
 End With 
 End With 
 
End Sub

メソッド

• Duplicate
• Reset
• SetLineSpacing
• SetListType

プロパティ

• Alignment
• アプリケーション
• AttachedToText
• CharBasedFirstLineIndent
• FirstLineIndent
• KashidaPercentage
• KeepLinesTogether
• KeepWithNext
• LeftIndent
• LineSpacing
• LineSpacingRule
• ListBulletFontName
• ListBulletFontSize
• ListBulletText
• ListIndent
• ListNumberSeparator
• ListNumberStart
• ListType
• LockToBaseLine
• Parent
• RightIndent
• SpaceAfter
• SpaceBefore
• StartInNextTextBox
• タブ
• TextDirection
• TextStyle
• UseCharBasedFirstLineIndent
• WidowControl

関連項目

• Publisher オブジェクト モデル リファレンス

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

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