View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.misc
CLR CLR is offline
external usenet poster
 
Posts: 1,998
Default How can I delete several Autoshapes from a speadsheet at once?

Sub DeleteAllObjects()
ActiveSheet.DrawingObjects.Cut
End Sub

Vaya con Dios,
Chuck, CABGx3



"Husker87" wrote:

I have a old Spreadsheet form. It has several autoshape objects in it. They
are clear and without borders. The form has been copied several times and
they are now in the hundreds and just make the size of the file too big. If
you happen to click on one you can delete it but is there anyway to just
delete all imbedded pictures from a spreadsheet?