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


Свойство HeaderFooter.Index (Word)

Возвращает объект WdHeaderFooterIndex , представляющий указанный верхний или нижний колонтитул в документе или разделе. Только для чтения.

Синтаксис

expression. Индекс

выражение (обязательно). Переменная, представляющая объект HeaderFooter.

Пример

В этом примере фигура добавляется в заголовок первой страницы активного документа, если указанная переменная ссылается на первый заголовок страницы.

Sub ChangeFirstPageFooter() 
 Dim hdrFirstPage As HeaderFooter 
 
 Set hdrFirstPage = ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage) 
 
 If hdrFirstPage.Index = wdHeaderFooterFirstPage Then 
 With hdrFirstPage.Shapes.AddShape(Type:=msoShapeHeart, _ 
 Left:=36, Top:=36, Width:=36, Height:=36) 
 .Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0) 
 End With 
 End If 
 
End Sub

См. также

Объект HeaderFooter

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

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