Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Representa um conjunto de layouts personalizados associados ao design de uma apresentação.
Comentários
Use a propriedade CustomLayouts do slide objeto Master para retornar uma coleção CustomLayouts. Utilize CustomLayouts (índice), em que o índice é o número de índice de esquema personalizado, para devolver um único objeto CustomLayout .
Use o método Add para criar um novo layout personalizado e adicioná-lo à coleção CustomLayouts. Use o método Paste para antigas slides da área de transferência como uma CustomLayout do objeto na coleção CustomLayouts.
Use a propriedade CustomLayout de um objeto Slide ou SlideRange para retornar um layout personalizado de um slide ou de um conjunto de slides.
Exemplo
O exemplo a seguir adiciona um layout personalizado ao slide mestre da apresentação ativa.
Sub AddCustomLayout()
With ActivePresentation.SlideMaster
.CustomLayouts.Add (1)
.CustomLayouts(1).Name = "MyLayout"
End With
End Sub
O exemplo a seguir exibe o nome do layout personalizado para o primeiro slide da apresentação ativa.
MsgBox ActivePresentation.Slides(1).CustomLayout.Name
Métodos
| Nome |
|---|
| Adicionar |
| Item |
| Paste |
Propriedades
| Nome |
|---|
| Aplicativo |
| Count |
| Parent |
Confira também
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.