ParagraphFormat オブジェクト

ParagraphFormat オブジェクト

複数のオブジェクト ParagraphFormat 複数のオブジェクト

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

使い方

Format プロパティを使用して、1 つまたは複数の段落の ParagraphFormat オブジェクトを取得します。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 の左インデントを 25mm に変更し、新しい文書を作成します。文書に文字列を挿入し、myDup の段落書式を段落に適用します。

Set myDup = ActiveDocument.Paragraphs(1).Format.Duplicate
myDup.LeftIndent = MillimetersToPoints(25)
Documents.Add
Selection.InsertAfter "これは新しい段落です。"
Selection.Paragraphs.Format = myDup