通过

Word) (ParagraphFormat 对象

  • 项目

代表段落的所有格式。

备注

使用 格式 要返回的 ParagraphFormat 对象的段落或段落属性。 ParagraphFormat 属性返回选定内容、 范围、 样式、 查找 对象或 替换 对象的 ParagraphFormat 对象。 下面的示例使活动文档中的第三段。

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

也可以通过使用 重复 使现有 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。