excel 2010 VBA InsertPicInRange only makes shortcut to image instead of copy of image

Originally Posted by ArjanSpit

The problem lies in the second bit.
In the "Sub InsertPicInRange".
The "Sub TestInsertPicture" isn't used.

you have to run Sub TestInsertPicture(), not other sub, don't mix my code with your.