Shape.Group

Function Group() As Shape

Member of Shape

The Group method groups the shapes that are part of the current shape and returns the group.

•

This method is applicable for selection shapes only (that is, shapes whose Shape.Type property is cdrSelectionShape).

The following VBA example groups the current selection and moves the group to the current layer.

Sub Test()

Dim g As Shape

Set g = ActiveSelection.Group

g.Layer = ActiveLayer

End Sub