Свойство 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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.