Compartilhar via


Objeto Slides (PowerPoint)

Uma coleção de todos os objetos Slide da apresentação especificada.

Comentários

Se a sua solução de Visual Studio inclui a referência de Microsoft.Office.Interop.PowerPoint, essa coleção é mapeado para os seguintes tipos:

  • Microsoft.Office.Interop.PowerPoint.Slides.GetEnumerator (para enumerar os objetos Slide.)

Os exemplos a seguir descrevem como:

  • Criar um slide e adicioná-lo à coleção

  • Retornar um único slide que você especifique por nome, número de índice ou número de identificação de slide

  • Retornar um subconjunto de slides da apresentação

  • Aplicar uma propriedade ou um método a todos os slides da apresentação ao mesmo tempo

Exemplo

Use a propriedade Slides para retornar uma coleção Slides. Use o método Add para criar um novo slide e adicioná-lo à coleção. O exemplo seguinte adiciona um novo slide à apresentação ativa.

ActivePresentation.Slides.Add 2, ppLayoutBlank

Use Slides (índice), em que o índice é o nome do slide ou o número do índice ou use o Slides.FindBySlideID (índice), em que o índice é o número da ID do slide, para retornar um único objeto Slide . O exemplo a seguir define o layout do slide um da apresentação ativa.

ActivePresentation.Slides(1).Layout = ppLayoutTitle

O exemplo seguinte define o layout para o slide chamado "Big Chart" na apresentação ativa. Observe que slides recebem automaticamente gerados nomes do formulário Sliden (onde n é um inteiro) quando eles são criados. Para atribuir um nome mais significativo a um slide, use a propriedade Name .

ActivePresentation.Slides("Big Chart").Layout = ppLayoutTitle

Use Slides.Range (index), em que o índice é o número ou o nome do índice de slides ou uma matriz de números de índice de slides ou uma matriz de nomes de slides, para retornar um objeto SlideRange que representa um subconjunto da coleção Slides . O exemplo a seguir define o preenchimento de plano de fundo para os slides um e três na apresentação ativa.

With ActivePresentation.Slides.Range(Array(1, 3)) 
    .FollowMasterBackground = False 
    .Background.Fill.PresetGradient msoGradientHorizontal, _ 
        1, msoGradientLateSunset 
End With

Se você deseja fazer algo para todos os slides da apresentação ao mesmo tempo (tais como excluir todos eles ou definir uma propriedade para todos eles), use os slides. Range sem nenhum argumento para construir uma coleção SlideRange que contém todos os slides da coleção Slides e, em seguida, aplique a propriedade ou método apropriado à coleção SlideRange. O exemplo a seguir define o preenchimento de plano de fundo para todos os slides da apresentação ativa

With ActivePresentation.Slides.Range 
    .FollowMasterBackground = False 
    .Background.Fill.PresetGradient msoGradientHorizontal, _ 
        1, msoGradientLateSunset 
End With

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.