Thanks for the quick reply.
Changing that still give me the same issue.
When i close the picture folder and the error message is shown,clicking on debug then shows me the following in yellow.
Code:
ActiveSheet.Pictures.Insert("C:\Users\Ian\Desktop\SKYPE\LOCK PICK ME\" & Target.Value & ".jpg").Select