Macro To Delete Pictures or Autoshape

Is there a code to delete general autoshapes without considereing the name? Right now I have

Please Login or Register  to view this content.

but the problem with that is it only deletes that specific picture according to its number/name. When I get rid of the picture number in the code it won't delete the rest of the other pictures because of the picture number/name. So is there a code to delete general shapes disregarding the specific name of the picture

Hello there,

To begin first make a copy of your worksheet or workbook just in case this doesn't do what you want it to then try the below code.

Please Login or Register  to view this content.

To use this code:

Hold down the Alt key and press the F8 key. In the space provided for a macro name type DeleteShapes then select the create option. Paste the code above in the space below the Sub DeleteShapes() and the End Sub. Then exit out of the VBA window. Press Alt+F8 again and then select the DeleteShapes option and select Run.

Let me know if this works for you.

Thanks!

RVASQUEZ