共用方式為

Word) (ParagraphFormat 物件

  • 發行項

代表段落的所有格式設定。

註解

使用 格式 若要傳回的段落或多個段落的 ParagraphFormat 物件的屬性。 ParagraphFormat 屬性會傳回選取範圍、 範圍、 樣式、 尋找 物件或 Replacement 物件的 ParagraphFormat 物件。 下面範例將使用中文件內的第三個段落置中。

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

下列範例會在選取範圍之後尋找下一個雙行間距的段落。

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

您可以也複製獨立將現有的 ParagraphFormat 物件所使用的 重複 屬性。 下列範例會複製使用中檔內第一個段落的段落格式設定，並將格式儲存在 myDup 中。 此範例會將 myDup 的左縮排變更為 1 英吋、建立新檔、將文字插入檔中，並將 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 支援與意見反應。