Designs.Clone method (PowerPoint)
Creates a copy of a Design object.
Syntax
expression. Clone( _pOriginal_, _Index_ )
expression A variable that represents a Designs object.
Parameters
| Name | Required/Optional | Data type | Description |
|---|---|---|---|
| pOriginal | Required | Design | Design object. The original design. |
| Index | Optional | Long | The index location in the Designs collection into which the design will be copied. If Index is omitted, the cloned design is added to the end of the Designs collection. |
Return value
Design
Example
This example creates a design and clones the newly created design.
Sub CloneDesign()
Dim dsnDesign1 As Design
Dim dsnDesign2
Set dsnDesign1 = ActivePresentation.Designs _
.Add(designName:="Design1")
Set dsnDesign2 = ActivePresentation.Designs _
.Clone(pOriginal:=dsnDesign1, Index:=1)
End Sub
See also
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.