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.