Объект 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
Используйте ключевое слово New в 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 и обратная связь.