Don already offered the looping the shapes solution as the first response to
this post.

I suggested the selectall approach, but that is probably what was producing
the out of memory problem. Dave Peterson has suggested it frequently in the
past, but also said he had some problems with out of memory.

Near as I can tell, the bases have been covered - not sure what you are
trying to tell us/me here.

--
Regards,
Tom Ogilvy



"Myrna Larson" wrote in message
...
You are correct that the Shapes *collection* doesn't have a Delete method.
But a Shape
(singular) object does, i.e. Shapes.Delete, no, but Shapes(i).Delete
should be OK.

On Tue, 2 Sep 2003 12:17:23 -0400, "Tom Ogilvy" wrote:

Shapes doesn't have a delete method. What you can do is

ActiveSheet.Shapes.SelectAll
Selection.Delete