Shape.Clones

Property Clones As ShapeRange

Member of Shape

The Clones property returns a ShapeRange object containing all cloned shapes for the specified clone-control object.

The Clones property returns a read-only value.

The following code example restores fill links for all clones of the currently selected shape:

Sub Test() 
 Dim s As Shape 
 For Each s In ActiveShape.Clones 
  s.CloneLink.FillLinked = True 
 Next s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.