Objeto CustomLayouts (PowerPoint)

Representa un conjunto de diseños personalizados asociados a un diseño de presentación.

Comentarios

Utilice la propiedad CustomLayouts del objeto Master slide para devolver una colección CustomLayouts. Use CustomLayouts (index), donde index es el número de índice de diseño personalizado, para devolver un único objeto CustomLayout .

Utilice el método Add para crear un nuevo diseño personalizado y agregarlo a la colección CustomLayouts. Utilice el método Paste para pegar diapositivas del Portapapeles como un CustomLayout del objeto en la colección CustomLayouts.

Utilice la propiedad CustomLayout de un objeto Slide o SlideRange para devolver un diseño personalizado de una diapositiva o un conjunto de diapositivas.

Ejemplo:

En el siguiente ejemplo se agrega un diseño personalizado al patrón de diapositivas de la presentación activa.

Sub AddCustomLayout()

    With ActivePresentation.SlideMaster

        .CustomLayouts.Add (1)

        .CustomLayouts(1).Name = "MyLayout"

    End With

End Sub

En el siguiente ejemplo se muestra el nombre del diseño personalizado para la primera diapositiva de la presentación activa.

MsgBox ActivePresentation.Slides(1).CustomLayout.Name

Métodos

Nombre
Add
Elemento
Paste

Propiedades

Nombre
Aplicación
Count
Parent

Vea también

• Referencia del modelo de objetos de PowerPoint

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.