Объект Sections (Word)
Коллекция объектов Section в выделенном фрагменте, диапазоне или документе.
Замечания
Используйте свойство Sections , чтобы вернуть коллекцию Sections . В следующем примере текст вставляется в конец последнего раздела активного документа.
With ActiveDocument.Sections.Last.Range
.Collapse Direction:=wdCollapseEnd
.InsertAfter "end of document"
End With
Используйте метод Add или InsertBreak , чтобы добавить новый раздел в документ. В следующем примере в начале активного документа добавляется новый раздел.
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
ActiveDocument.Sections.Add Range:=myRange
myRange.InsertParagraphAfter
В следующем примере отображается количество разделов в активном документе, добавляет разрыв раздела над первым абзацем в выделенном фрагменте, а затем снова отображается количество разделов.
MsgBox ActiveDocument.Sections.Count & " sections"
Selection.Paragraphs(1).Range.InsertBreak _
Type:=wdSectionBreakContinuous
MsgBox ActiveDocument.Sections.Count & " sections"
Используйте Sections (index), где index — это номер индекса, чтобы вернуть один объект Section . В следующем примере изменяется левое и правое поля страницы для первого раздела активного документа.
With ActiveDocument.Sections(1).PageSetup
.LeftMargin = InchesToPoints(0.5)
.RightMargin = InchesToPoints(0.5)
End With
Методы
Имя |
---|
Add |
Элемент |
Свойства
Имя |
---|
Application |
Count |
Creator |
First |
Last |
PageSetup |
Parent |
См. также
Справочник по объектной модели Word
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.