Метод PageNumbers.Add (Word)
Возвращает объект PageNumber , представляющий номера страниц, добавленные в верхний или нижний колонтитул в разделе.
Синтаксис
expression. Добавить (PageNumberAlignment, FirstPage)
выражение (обязательно). Переменная, представляющая объект PageNumbers .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
PageNumberAlignment | Необязательный | Variant | Может быть любой константой WdPageNumberAlignment . |
FirstPage | Необязательный | Variant | Значение False , чтобы колонтитулы первой и первой страницы отличались от колонтитулов на всех последующих страницах документа. Если параметр FirstPage имеет значение False, номер страницы не добавляется на первую страницу. Если этот аргумент опущен, параметр управляется свойством DifferentFirstPageHeaderFooter . |
Замечания
Если свойство LinkToPrevious для объекта HeaderFooter имеет значение True, номера страниц будут продолжаться последовательно от одного раздела к следующему в документе.
Пример
В этом примере номер страницы добавляется в основной нижний колонтитул в первом разделе активного документа.
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add _
PageNumberAlignment:=wdAlignPageNumberLeft, _
FirstPage:=True
End With
Этот пример создает и форматирует номера страниц в заголовке активного документа.
Set myPgNum = ActiveDocument.Sections(1) _
.Headers(wdHeaderFooterPrimary) _
.PageNumbers.Add(PageNumberAlignment:= _
wdAlignPageNumberCenter, FirstPage:= True)
myPgNum.Select
With Selection.Range
.Italic = True
.Bold = True
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.