Thread: Group Shapes
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Paul Mathews Paul Mathews is offline
external usenet poster
 
Posts: 84
Default Group Shapes

Hi James,

Perhaps something like this helps (below I'm grouping two shapes, one named
'Shape1' and the other name 'Shape2'):

Sub GroupShapes()
ActiveSheet.Shapes.Range(Array("Shape1", "Shape2")).Select
Selection.ShapeRange.Group.Select
End Sub

You could replace the array item with your array.


"Zone" wrote:

I have a number of shapes on my worksheet. I want to group only SOME
of these. I can fill an array with the names of the shapes I want to
group, but how do I tell VBA which shapes to group together? TIA,
James