ParagraphFormat オブジェクト (Word)

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

注釈

段落または段落の ParagraphFormat オブジェクトを取得するには、Format プロパティを使用します。 ParagraphFormat プロパティは、選択範囲、指定範囲、スタイル、 Find オブジェクト、または Replacement オブジェクトの ParagraphFormat オブジェクトを返します。 次の使用例は、作業中の文書の 3 番目の段落を中央揃えに配置します。

ActiveDocument.Paragraphs(3).Format.Alignment = _ 
 wdAlignParagraphCenter

次の使用例は、選択範囲の後で、間隔が 2 行に設定されている最初の段落を検索します。

With Selection.Find 
 .ClearFormatting 
 .ParagraphFormat.LineSpacingRule = wdLineSpaceDouble 
 .Text = "" 
 .Forward = True 
 .Wrap = wdFindContinue 
End With 
Selection.Find.Execute

Visual Basic の New キーワードを使用して、新しいスタンドアロン の ParagraphFormat オブジェクトを作成します。 次の使用例は、ParagraphFormat オブジェクトを作成し、そのオブジェクトに任意の書式プロパティを設定し、すべてのプロパティを作業中の文書内の最初の段落に適用します。

Dim myParaF As New ParagraphFormat 
myParaF.Alignment = wdAlignParagraphCenter 
myParaF.Borders.Enable = True 
ActiveDocument.Paragraphs(1).Format = myParaF

Duplicate プロパティを使用して、既存の ParagraphFormat オブジェクトのスタンドアロン コピーを作成することもできます。 次の使用例は、作業中の文書で最初の段落の段落書式を複製し、myDup に格納します。 myDup の左インデントを 1 インチ (25 mm) に変更し、新しい文書を作成し、この文書に文字列を挿入し、myDup の段落書式をこの文字列に適用します。

Set myDup = ActiveDocument.Paragraphs(1).Format.Duplicate 
myDup.LeftIndent = InchesToPoints(1) 
Documents.Add 
Selection.InsertAfter "This is a new paragraph." 
Selection.Paragraphs.Format = myDup

関連項目

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

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

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