Collecting list of Photos and hyperlinking to them?

[Haldun]

Hi,

Change following code
[vba].Cells(i, 4).Hyperlinks.Add Anchor:=Selection, Address:=MyFile, TextToDisplay:="Yes"[/vba]
with
[vba].Cells(i, 4).Hyperlinks.Add Anchor:=.Cells(i, 4), Address:=Picfile, TextToDisplay:="Yes"[/vba]