Returns a object, representing a collection of designs.

Syntax

expression.Designs

expression A variable that represents a Presentation object.

Return Value
Designs

Example

The following example displays a message for each design in the active presentation.

Visual Basic for Applications 
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

See also: