Метод Selection. Group (Visio)Selection.Group method (Visio)

Группирует объекты, выбранные в выделенном фрагменте, или преобразует фигуру в группу.Groups the objects that are selected in a selection, or it converts a shape into a group.

СинтаксисSyntax

Expression. Группаexpression.Group

Expression (выражение ) Переменная, представляющая объект Selection .expression A variable that represents a Selection object.

Возвращаемое значениеReturn value

ShapeShape

ПримерExample

В приведенном ниже примере показано, как группировать объекты фигур .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

Поддержка и обратная связьSupport and feedback

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.