Объект ParagraphFormat (Word)

Представляет все форматирование абзаца.

Замечания

Используйте свойство Format , чтобы вернуть объект ParagraphFormat для абзаца или абзацев. Свойство ParagraphFormat возвращает объект ParagraphFormat для выделенного объекта, диапазона, стиля, объекта Find или Replacement . В следующем примере третий абзац в активном документе сосредоточен.

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 для создания автономного объекта 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 и обратная связь.