Deleting Shapes
 

Dear newsgroupers,

In Excel 2007 I want to copy a worksheet that contains some shapes to a
new workbook and remove the shapes from the copy before I save the new
workbook.

When I use the expression:
ActiveSheet.Shapes.SelectAll
Selection.Delete

I get an error saying I am running low on memory.
I use a laptop with 1 GB of memory.

Is the code correct?
Is there another solution?

Please advise,

pablo k

Deleting Shapes
 

Try

Activesheet.DrawingObjects.Delete

If this post helps click Yes
---------------
Jacob Skaria


"pablo k" wrote:

Dear newsgroupers,

In Excel 2007 I want to copy a worksheet that contains some shapes to a
new workbook and remove the shapes from the copy before I save the new
workbook.

When I use the expression:
ActiveSheet.Shapes.SelectAll
Selection.Delete

I get an error saying I am running low on memory.
I use a laptop with 1 GB of memory.

Is the code correct?
Is there another solution?

Please advise,

pablo k

Deleting Shapes
 

Yes, Jakob Skaria's solution works!

But I don't know what you mean with "click Yes"...

Thanks though

pablo k


Jacob Skaria schreef:
Try

Activesheet.DrawingObjects.Delete

If this post helps click Yes
---------------
Jacob Skaria


"pablo k" wrote:

Dear newsgroupers,

In Excel 2007 I want to copy a worksheet that contains some shapes to a
new workbook and remove the shapes from the copy before I save the new
workbook.

When I use the expression:
ActiveSheet.Shapes.SelectAll
Selection.Delete

I get an error saying I am running low on memory.
I use a laptop with 1 GB of memory.

Is the code correct?
Is there another solution?

Please advise,

pablo k

Deleting Shapes
 

See also this page for more info
http://www.rondebruin.nl/controlsobjectsworksheet.htm

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm




"pablo k" wrote in message ...
Dear newsgroupers,

In Excel 2007 I want to copy a worksheet that contains some shapes to a
new workbook and remove the shapes from the copy before I save the new
workbook.

When I use the expression:
ActiveSheet.Shapes.SelectAll
Selection.Delete

I get an error saying I am running low on memory.
I use a laptop with 1 GB of memory.

Is the code correct?
Is there another solution?

Please advise,

pablo k