Compartilhar via

Propriedade HeaderFooter.Index (Word)

  • Artigo

Retorna um WdHeaderFooterIndex que representa o cabeçalho ou rodapé especificado em um documento ou seção. Somente leitura.

Sintaxe

expressão. Índice

expressão Obrigatório. Uma variável que representa um objeto 'HeaderFooter'.

Exemplo

Este exemplo adiciona uma forma ao cabeçalho da primeira página no documento ativo se as variáveis especificadas se referirem ao cabeçalho da primeira página.

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

Confira também

Objeto HeaderFooter

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.