Свойство PageNumbers.ChapterPageSeparator (Word)

Статья
04/07/2023

Возвращает или задает символ-разделитель, используемый между номером главы и номером страницы. Чтение и запись WdSeparatorType.

Синтаксис

выражение. ChapterPageSeparator

Выражение Выражение, представляющее объект PageNumbers.

Замечания

Перед созданием номеров страниц, включающих номера глав, заголовки документов должны иметь нумерованный формат структуры, использующий стили из диалогового окна Маркеры и нумеровка . Для этого в Visual Basic используйте метод ApplyListTemplate .

Пример

В первой части этого примера создается новый документ, добавляются заголовки глав и разрывы страниц, а затем форматируется документ с помощью последнего нумерованного формата структуры, указанного в диалоговом окне Маркеры и нумеровка . Вторая часть примера добавляет в заголовок номера страниц по центру, включая номер главы; en dash разделяет номер главы и номер страницы.

Dim intLoop As Integer 
Dim hfTemp As HeaderFooter 
 
Documents.Add 
For intLoop = 1 To 5 
 With Selection 
 .TypeParagraph 
 .InsertBreak 
 End With 
Next intLoop 
ActiveDocument.Content.Style = wdStyleHeading1 
ActiveDocument.Content.ListFormat.ApplyListTemplate _ 
 ListTemplate:=ListGalleries(wdOutlineNumberGallery) _ 
 .ListTemplates(7) 
 
Set hfTemp = ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary) 
With hfTemp.PageNumbers 
 .Add PageNumberAlignment:=wdAlignPageNumberCenter 
 .NumberStyle = wdPageNumberStyleArabic 
 .IncludeChapterNumber = True 
 .HeadingLevelForChapter = 0 
 .ChapterPageSeparator = wdSeparatorEnDash 
End With

См. также

Объект коллекции PageNumbers

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через