Classe HeadersFooters (PowerPoint VBA)

Contém todos os objetos HeaderFooter do slide, página de anotações, folheto ou mestre especificado.

Set

Para usar uma variável de classe HeadersFooters, ela primeiro precisa ser instanciada por exemplo

Dim hfs as HeadersFooters
Set hfs = ActivePresentation.SlideMaster.HeadersFooters

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo HeadersFooters: CustomLayout.HeadersFooters, Master.HeadersFooters, Slide.HeadersFooters e SlideRange.HeadersFooters

Clear

Limpa o cabeçalho e o rodapé a partir do slide ou slides especificados.

ActivePresentation.SlideMaster.HeadersFooters.Clear

DateAndTime

Retorna um objeto HeaderFooter que representa o item de data e hora que aparece no canto inferior esquerdo de um slide ou no canto superior direito de uma página de anotações, um folheto ou uma estrutura de tópicos. Somente leitura.

Dim hfrDateAndTime As HeaderFooter
Set hfrDateAndTime = ActiveWindow.Selection.SlideRange(1).HeadersFooters.DateAndTime

DisplayOnTitleSlide

Determina se o rodapé, a data e hora e o número do slide aparecerão no slide de título. Aplica-se a slides mestres. Leitura/gravação.

O valor da propriedade DisplayOnTitleSlide pode ser uma destas constantes MsoTriState .

ActiveWindow.Selection.SlideRange(1).HeadersFooters.DisplayOnTitleSlide = msoTrue

Footer

Retorna um objeto HeaderFooter que representa o rodapé que aparece na parte inferior de um slide ou no canto inferior esquerdo de uma página de anotações, um folheto ou uma estrutura de tópicos. Somente leitura.

Dim hfrFooter As HeaderFooter
Set hfrFooter = ActiveWindow.Selection.SlideRange(1).HeadersFooters.Footer

Header

Retorna um objeto HeaderFooter que representa o cabeçalho que aparece na parte superior de um slide ou no canto superior esquerdo de uma página de anotações, um folheto ou uma estrutura de tópicos. Somente leitura.

Dim hfrHeader As HeaderFooter
Set hfrHeader = ActiveWindow.Selection.SlideRange(1).HeadersFooters.Header

Parent

Retorna o objeto parente para o objeto especificado.

SlideNumber

Retorna um objeto HeaderFooter que representa o número do slide no canto inferior direito de um slide ou o número da página no canto inferior direito de uma página de anotações ou da página impressa de um folheto ou de uma estrutura de tópicos. Somente leitura.

Dim hfrSlideNumber As HeaderFooter
Set hfrSlideNumber = ActiveWindow.Selection.SlideRange(1).HeadersFooters.SlideNumber