Partilhar via


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.