Presentation.Designs property (PowerPoint)
Returns a Designs object that represents a collection of designs.
expression A variable that represents a Presentation object.
The following example displays a message for each design in the active presentation.
Sub AddDesignMaster() Dim desName As Design With ActivePresentation For Each desName In .Designs MsgBox "The design name is " & .Designs.Item(desName.Index).Name Next End With End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.