Hi Stephan,
After taking Andy's hint regarding passing parameters, I've almost got
this to work ... the shapes are being created when I pass PShape as the
only argument to set_draw, but now no groups are created. Got to be
something simple!
Thanks for all the help, when I get it right,
Thanks to recent help from the API DEV group volunteers, the below
routine works well when creating one shape
sub set_draw(byval oPage as variant, byval Gradient as variant,_
byval Shape1 as variant, byval PShape as variant,_
byval PolyPolygon as variant, byval Shapes as object,