VBA Inserting Picture From File with Loops [Closed]

Report

EvieLove

Posts: 1
Registration date: Monday February 13, 2017
Status: Member
Last seen: February 13, 2017

- Feb 13, 2017 at 09:22 AM

Help please?

I am using the below code to insert a picture from a file based on the value of a cell. I just need it to repeat this for every row. Also I need to make sure the picture stays if the sheet is sent somewhere else that does not have access to the I:\ on our network. Can someone help me please? I am very new to VBA, I have just been doing a lot of googling.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A2")) Is Nothing Then Exit Sub
Dim myPict As Picture

With Range("B2")
Set myPict = Range("B2").Parent.Pictures.Insert("I:\Presenter\Images\" & Target.Value & ".jpg")
myPict.Top = .Top
myPict.Width = .Width
myPict.Height = .Height
myPict.Left = .Left
myPict.Placement = xlMoveAndSize
End With

End Sub

Thanks
Eve

VBA Inserting Picture From File with Loops
Vba insert picture from file - Forum - Excel
Excel vba insert picture from folder - How-To - Excel
Excel vba insert picture in email body - How-To - Excel
Vba insert picture into cell ✓ - Forum - Excel
VBA code for Inserting an Image - Forum - Excel

VBA Inserting Picture From File with Loops [Closed]

Your reply

Subscribe To Our Newsletter!