Excel 2007 Shape.Range.Group does not work correctly

Hi guys,

It seems Excel 2007 deal with "Shape.Range.Group" differently from Excel 2003.
I have a program to draw a map using zip data. There is an array to hold each individual shape and group them together and rescale them at the end to get a printable map. This works perfectly fine with Excel 2003 but not for 2007.

Any idea how I can fix it?

Following is information about the code
1) Array "ShapesArray" has 2016 elements:
ShapesArray(0): Label@35121@1
ShapesArray(1): Zip@35121@1
........
ShapesArray(2014): Label@36756@1
ShapesArray(2015): Zip@36756@1

2). "Me.Location" specifies which worksheet to go

3). It seems not all the shapes can be grouped and after I re-scale it, some are left over.

4). Here is the code:

Set auxGroup = Me.Location.Shapes.Range(ShapesArray).Group <------- Not working here
    With auxGroup
        .ScaleHeight 0.2, msoFalse
        .ScaleWidth 0.2, msoFalse
    End With

Many thanks to any thought!

Eric