Selection.Group Method (Visio)
TOC
Collapse the table of content
Expand the table of content
The document is archived and information here might be outdated

Selection.Group Method (Visio)

Groups the objects that are selected in a selection, or it converts a shape into a group.

Version Added: Visio 2.0

expression .Group

expression A variable that represents a Selection object.

Return Value

Shape

The following example shows how to group Shape objects.

 
Public Sub Group_Example() 
 
 Dim vsoShape1 As Visio.Shape 
 Dim vsoShape2 As Visio.Shape 
 Dim vsoGroupShape As Visio.Shape 
 Dim vsoSelection As Visio.Selection 
 
 'Draw two rectangles. 
 Set vsoShape1 = ActivePage.DrawRectangle(1, 2, 2, 1) 
 Set vsoShape2 = ActivePage.DrawRectangle(1, 4, 2, 3) 
 
 'Deselect all shapes, and then select the two rectangles. 
 Set vsoSelection = ActiveWindow.Selection 
 vsoSelection.Select vsoShape1, visDeselectAll + visSelect 
 vsoSelection.Select vsoShape2, visSelect 
 
 'Group the rectangles into a group shape. 
 Set vsoGroupShape = vsoSelection.Group 
 
End Sub 

Show:
© 2016 Microsoft