I am trying to write a macro where I can change images for a picture file. I can do the insert method, but if I change pictures and run it again, it just inserts the next picture on top of it instead of changing the current image. Can anyone help here?
-
If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.
Changing Images With VBA
- Thread starter Coach3131
- Start date
I have a cell with a URL referenced that inserts an image. For example, www.mysite.com/image1.jpg.
The next time I run it, I may want to reference /image2.jpg. I want the picture to be in the same spot in the report as before but just changed based on the cell reference.
If I use the Insert method, it will just insert the image on top of the old one instead of change it out.
The next time I run it, I may want to reference /image2.jpg. I want the picture to be in the same spot in the report as before but just changed based on the cell reference.
If I use the Insert method, it will just insert the image on top of the old one instead of change it out.
Upvote
0
jolivanes
Well-known Member
- Joined
- Sep 5, 2004
- Messages
- 2,773
- Office Version
- 2013
- 2007
- Platform
- Windows
Code:
Sub DeletePics()
Dim **** As Shape
For Each **** In Sheet1.Shapes
If ****.Type = msoPicture Then ****.Delete
Next
'Here the rest of your code
End SubIf you have some stray pictures floating around, it will delete them also.
Note: It will delete all pictures
Upvote
0
Code:
ImageReference = Range("MyImageReference").Value
On Error Resume Next
ActiveSheet.Shapes.Range(Array("MyImagePic")).Delete
Range("ImageLocation").Select
ActiveSheet.Pictures.Insert(ImageReference).Name = "MyImagePic"I am able to insert and set location this way... there may be a better way to do the error handling so that if a pic doesn't exist, it doesn't break the code. Also, the code above to delete images, is there a way to put a list of the images to change in an array versus deleting every image? Lets say that I have 5 images on a page and 2 are always static... I would only want to delete the 3 that are not static and replace their references versus delete every picture.
Last edited:
Upvote
0
Similar threads
