Table of contents
TOC
Collapse the table of content
Expand the table of content

Shape.Duplicate Method (PowerPoint)

office 365 dev account|Last Updated: 6/12/2017
|
1 Contributor

Creates a duplicate of the specified Shape object, adds the new shape to the Shapes collection, and then returns a new ShapeRange object. The duplicated objects are placed at the end of the Shapes collection.

Syntax

expression. Duplicate

expression A variable that represents a Shape object.

Return Value

ShapeRange

Example

This example adds a new, blank slide at the end of the active presentation, adds a diamond shape to the new slide, duplicates the diamond, and then sets properties for the duplicate. The first diamond will have the default fill color for the active color scheme; the second diamond will be offset from the first one and will have the default shadow color.

Set mySlides = ActivePresentation.Slides

Set newSlide = mySlides.Add(mySlides.Count + 1, ppLayoutBlank)

Set firstObj = newSlide.Shapes _
    .AddShape(msoShapeDiamond, 10, 10, 250, 350)

With firstObj.Duplicate
    .Left = 150
    .Fill.ForeColor.SchemeColor = ppShadow
End With

See also

Concepts

Shape Object

© 2018 Microsoft