Previous Document Next Document

Object Model Reference : Classes : S : ShapeRange : Methods : ShapeRange.AddToSelection


ShapeRange.AddToSelection

Sub AddToSelection()

Description

Member of ShapeRange

The AddToSelection method adds all the shapes in a shape range to the current selection.

 
VBA example

The following VBA example selects all the ellipses and rectangles on the current page.

Sub Test()
 ActivePage.FindShapes(Type:=cdrEllipseShape).CreateSelection
 ActivePage.FindShapes(Type:=cdrRectangleShape).AddToSelection
End Sub

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.