Propriedade PageSetup.OddAndEvenPagesHeaderFooter (Word)
True se o objeto PageSetup especificado tiver cabeçalhos e rodapés de páginas ímpares e pares diferentes. Long de leitura/gravação.
Sintaxe
expressão. OddAndEvenPagesHeaderFooter
Expressão Uma expressão que retorna um objeto PageSetup .
Comentários
A propriedade OddAndEvenPagesHeaderFooter pode ser True, False ou wdUndefined.
Exemplo
Este exemplo cria cabeçalhos e rodapés diferentes para páginas de numeração ímpar e páginas de numeração par no Document1.
Set myDoc = Documents("Document1")
myDoc.PageSetup.OddAndEvenPagesHeaderFooter = True
With myDoc.Sections(1)
.Headers(wdHeaderFooterPrimary).Range _
.InsertAfter "Odd Header"
.Headers(wdHeaderFooterEvenPages).Range _
.InsertAfter "Even Header"
End With
Confira também
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.