🚀 go-pugleaf

I needed to create a reusable function that accepts a collection of PageItems and returns a Group object that contains the PageItems.  I did this in version 1.5.2 using a 'ReDim' statement in the function to size the variant array according to the number of PageItems in the collection. 

In version 1.5.2, the following statement worked: 

ReDim MyVarArray (myCollection.Count) as Variant 

This didn't work in version 2.0.1 unless both bounds were specified, i.e., ReDim MyVarArray (1 to MyCollection.Count) as Variant 
but it only works the first time the function is called.  On subsequent calls, the group.add method fails with 'runtime error 30470: Invalid Parameter'. 

I tried Dim VarArray(100) so that the array is always large enough to group my PageItems but this fails with the same message (and it probably does so because the array isn't full). 

All of the code examples I've seen use a fixed number of PageItems. 

Is there a better way to do this so that I can group an arbitrary number of PageItems?  

The only alternative that I've found so far is to use the Document.Select method to identify each PageItem and then pass Document.Selection to the Group.Add method but this is awkward and probably carries a performance penalty.