Clase Design (PowerPoint VBA)

La clase Design representa una plantilla de diseño de diapositiva individual. El objeto Design es un miembro de las colecciones Designs y SlideRange y los objetos Master y Slide.

Para usar una variable de clase Design, primero debe ser instanciado, por ejemplo

Dim dsg as Design
Set dsg = ActivePresentation.Designs(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase Design : CustomLayout.Design, Designs.Add, Designs.Clone, Designs.Item, Designs.Load, Master.Design, Slide.Design y SlideRange.Design.

Delete

Elimina el objeto de diseño especificado.

ActivePresentation.Designs(1).Delete

Index

Devuelve un Long que representa el número de índice de un efecto de animación o diseño. Solo lectura.

Dim lngIndex As Long
lngIndex = ActivePresentation.Designs(1).Index

MoveTo

Mueve el objeto especificado a una ubicación específica en la misma colección y vuelve a numerar correctamente el resto de elementos de la colección.

MoveTo (toPos)

toPos: Posición de índice a la que se va a mover el efecto de animación.

Dim lngtoPos As Long: lngtoPos = 15
ActivePresentation.Designs(1).MoveTo toPos:=lngtoPos

Name

Devuelve o establece el nombre del objeto especificado. Lectura y escritura.

Puede usar el nombre del objeto en combinación con el método Item para devolver una referencia al objeto si el método Item de la colección que contiene el objeto toma un argumento Variant . Por ejemplo, si el valor de la propiedad Name de una forma es Rectangle 2, .Shapes("Rectangle 2") devuelve una referencia a esa forma.

ActivePresentation.Designs(1).Name =

Preserved

Representa si el patrón de diseño está protegido frente a posibles cambios. Lectura y escritura.

El valor de la propiedad preserved puede ser una de estas constantes MsoTriState .

ActivePresentation.Designs(1).Preserved = msoTrue

SlideMaster

Devuelve un objeto Master que representa al patrón de diapositivas. Solo lectura.

Dim mstSlideMaster As Master
Set mstSlideMaster = ActivePresentation.Designs(1).SlideMaster