Pages

▼

Friday, May 04, 2007

Removing Pictures from Spreadsheet

Delete Images from Spreadsheets

Sub Delete_Images_From_Excel()

Dim sht As Worksheet
Dim shp As Shape

For Each sht In Sheets

For Each shp In sht.Shapes
shp.Delete
Next

Next sht

End Sub
at

4 comments:

  1. Anonymous9:33 AM

    AWESOME!!! Thank you! Saved me hours of work!
    Now I can go home! Woohoo!!

    ReplyDelete
  2. Anonymous9:49 PM

    Fantastic! I have little images in my spreadsheet for ages I can't get rid of them, now they are all gone. Genius, thanks.

    ReplyDelete
  3. Anonymous1:32 AM

    Thank,ThankThankThankThankThankThankThankThankThankThankThankThankThankThankThank i have no words so say god bless u

    ReplyDelete
  4. Sudip12:46 AM

    Hi

    These codes are deleting all the pictures which is awesome. However I need to delete selected pictures from the worksheet.

    Could you please let me know if you have any other codes for this?

    Regards,
    Sudip

    ReplyDelete