Linking of picture files in sheet.

[honeybhattal]

I have a file with a picture in it. Now, I keep this picture in the same folder as the excel file itself. I wish to know a way by which the picture automatically changes in the excel sheet, if i change the picture file in the folder. Put in other words, I want that picture(s) shown in the spreadsheet, which is/are present in the parent folder.

Any information/help is much appreciated.

Thanks in advance.

 

[RickXL]

Hi,

This code needs to go into the ThisWorkbook Module.

It looks for a jpg file in the same folder as the workbook then it loads it into the ActiveSheet.

Private Sub Workbook_Open()
    Dim pic As String
    pic = Dir(Path & "\*.jpg")
    If pic <> vbNullString Then ActiveSheet.Pictures.Insert (Path & "\" & pic)
End Sub