Selection.Group Method (Visio)
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


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 

© 2016 Microsoft