Object Model Reference : Classes : S : ShapeRange : Methods : ShapeRange.AddToSelection |
Sub AddToSelection()
Member of ShapeRange
The AddToSelection method adds all the shapes in a shape range to the current selection.
• |
See also the ShapeRange.CreateSelection and
ShapeRange.RemoveFromSelection methods
|
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 |
Copyright 2013 Corel Corporation. All rights reserved.