Presentation.Designs property (PowerPoint)

Returns a Designs object that represents a collection of designs.


expression. Designs

expression A variable that represents a Presentation object.

Return value



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


    End With

End Sub

See also

Presentation Object

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.