VBA delete all pictures in sheet

[WackoV]

Hi, I want to delete all pictures on a certain sheet (AR PROJ) and found this code:

Please Login or Register  to view this content.

But apparently, I receive this error message: "Run-Time error '438' Object doesn't support this property or method"
Can someone explain me what's wrong?

Thanks a lot!

Please Login or Register  to view this content.

[JosephP]

perhaps replace

Please Login or Register  to view this content.

by

Please Login or Register  to view this content.

[WackoV]

No, this doesn't do anything at all. It looks like my formula gives an error when there's only one picture to delete? Does that makes sense?

[JosephP]

what kind of pictures are they-activex images?

[WackoV]

No idea to be honest... They are pictures copy/pasted by using a macro but each month I need to delete them.

Selecting the pictures using the code works. I only get an error when trying to delete them by using a macro AND (recently found out) when there's only 1 picture on the sheet.
Deleting multiple pictures using the macro below works fine.

Please Login or Register  to view this content.

[JosephP]

then perhaps

Please Login or Register  to view this content.