I have a macro to select all shape . My problem is i would like to "Group" all the shape selected and not the buttons ... Furthermore i would like another macro to ungroup them after i do a a function on them . Would someone please help . I tried Then shp. Group all to no avail . I want to group shapes by there name actually . But i am to new in Vba To even start doing that . Thank you in advance . Happy Computing
Eric Maxfield
Sub SelectAll_Click()
Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
If Not (Shp.Type = msoOLEControlObject Or Shp.Type = msoFormControl) Then Shp.Select All
Next Shp
End Sub![]()
Bookmarks