CloneLink.ShapeLinked

Property ShapeLinked As Boolean

The ShapeLinked property returns a value indicating if the shape attributes of a clone object are linked to its parent object. If the ShapeLinked property is True, the shape attributes of the cloned object are linked to the parent object. If linked, the clone has the same shape attributes as its parent object.

You can also break or restore a link by assigning a value to the property.

The following code example looks at the shapes in the current selection that are cloned objects, and restores several links (fill, outline, shape and color) between the cloned objects and their parent objects.

Sub FillLink() 
 Dim s As Shape 
 For Each s In ActiveSelection.Shapes(1).Clones 
  s.CloneLink.FillLinked = True 
  s.CloneLink.BitmapColorMaskLinked = True 
  s.CloneLink.OutlineLinked = True 
  s.CloneLink.ShapeLinked = True 
  s.CloneLink.TransformLinked = True 
 Next s 
End Sub