title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
Presentation.Designs property (PowerPoint) |
vbapp10.chm583063 |
|
|
5ad47ac9-aaab-3971-1102-fa48e8bcef8b |
06/08/2017 |
medium |
Returns a Designs object that represents a collection of designs.
expression. Designs
expression A variable that represents a Presentation object.
Designs
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
[!includeSupport and feedback]