I believe you can click edit and then manage attachments and upload.
Here is what I used and it worked fine.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$6" Then
newpic = "C:\aaa\Pics\" & Range("C7").Value
Target.Comment.Shape.Fill.UserPicture newpic
End If
End Sub
Make sure the path with the files exists, you have you vlookup in C7, and the names of the files in column B. Also, make sure the code is in the worksheet module. Right click on the sheet tab and view code.
Bookmarks