Objeto HeaderFooter (PowerPoint)
Representa um cabeçalho, rodapé, data e hora, número do slide ou número de página em um slide ou slide mestre. Todos os objetos HeaderFooter para um slide ou slide mestre estão contidos em um objeto HeadersFooters.
Comentários
Use uma das propriedades listadas na tabela a seguir para retornar o objeto HeaderFooter.
Use esta propriedade | Para retornar |
---|---|
DateAndTime | Um objeto HeaderFooter que representa a data e hora no slide. |
Footer | Um objeto HeaderFooter que representa o rodapé do slide. |
Header | Um objeto HeaderFooter que representa o título do slide. Isso funciona somente para páginas de anotações e folhetos, não em slides. |
SlideNumber | Um objeto HeaderFooter que representam o número do slide (em um slide) ou o número de página (em uma página de anotações ou em um folheto). |
Observação
[!OBSERVAçãO] Objetos HeaderFooter não estão disponíveis para objetos Slide que representam as páginas de anotações. O objeto HeaderFooter que representa um cabeçalho está disponível somente para uma anotação mestra ou folheto mestre.
Exemplo
Você pode definir propriedades de objetos HeaderFooter para slides únicos. O exemplo a seguir define o texto de rodapé do slide um da apresentação ativa.
ActivePresentation.Slides(1).HeadersFooters.Footer.Text = "Volcano Coffee"
Você também pode definir propriedades de objetos HeaderFooter para o slide mestre, título mestre, anotações mestras ou folheto mestre afetar todos os slides, slides de título, páginas de anotações ou folhetos e estruturas de tópicos ao mesmo tempo. O exemplo a seguir define o texto no rodapé do slide mestre da apresentação ativa, define o formato para a data e hora e ativa a exibição de números de slide. Essas configurações serão aplicadas a todos os slides baseados nesse mestre que exibem mestre elementos gráficos e que não tiveram seus rodapé e a data e a hora definidas individualmente.
Set mySlidesHF = ActivePresentation.SlideMaster.HeadersFooters
With mySlidesHF
.Footer.Visible = True
.Footer.Text = "Regional Sales"
.SlideNumber.Visible = True
.DateAndTime.Visible = True
.DateAndTime.UseFormat = True
.DateAndTime.Format = ppDateTimeMdyy
End With
Para limpar as informações de cabeçalho e rodapé definidas para slides individuais e certificar-se de que todos os slides exibem o cabeçalho e as informações definidas por você para o slide mestre, execute o código a seguir antes de executar o exemplo anterior.
For Each s In ActivePresentation.Slides
s.DisplayMasterShapes = True
s.HeadersFooters.Clear
Next
Confira também
Referência de modelo de objeto do PowerPoint
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.