Remove background image with VB

[UHsoccer]

I have created a process where I use a background image and then add multiple text in various cells. I do this for about 10 sheets on a regular basis.
When I have to to rerun the process, I have to manually delete the background on each sheet first since the image name increments each time to a new one

Is there a way to simply "remove background image if it exists"

 

[patrickmuldoon99]

I don't know the direct code, but surely you could find it out by recording yourself removing the background image.

Then, if there is the possibility that there will be no background image to remove, you can include the line

on error resume next

after you have included the recorded instruction of removing the background image.


Hope this helps

Patrick

 

[UHsoccer]

When one records the delete of a background it looks like this

ActiveSheet.Shapes("Picture 49").Select
Selection.Delete

The problem is that the actual name "Picture 49" will be "Picture 50" the next time, etc. It is different on each sheet.

I need to find out how the get that name and then substitute that into the select statement

 

[patrickmuldoon99]

Ah right, i'm with you.

Well you could iterate through the workbooks shapes collection... are the shapes that are the background the only objects with "Picture" starting the name?

If so, we could iterate through activesheet.shapes and simply delete all images on the sheet.

 

[UHsoccer]

Thank you for the help, it now works flawlessly