Bild einfügen nicht als Verknüpfung

Sub Bildereinfügen()
enda = Worksheets("Tabelle1").Range("C65536").End(xlUp).Row
For i = 2 To enda
Range("C" & i).Select
filmname = ActiveCell.Value
Range("D" & i).Select
ActiveSheet.Pictures.Insert("C:\Pictures\" & filmname & ".png").Select
On Error Resume Next
Next i
End Sub

Ich habe irgendwo gelesen, dass mit Strg + A und dann Strg + Shift + F9, die Verknüpfungen
durch die Bilder ersetzt werden. Hat aber nicht funktioniert und ich habe in Excel auch  _
nirgends eine Möglichkeit gefunden, dass einzustellen.
Jetzt habe ich in diversen Foren gefunden, dass die Funktion Pictures.Insert seit Excel 2010  _
immer nur Verknüpfungen einfügt. Um die Bilder direkt einzufügen müsste man folgendes Makro mit  _
_
Shapes.AddPicture verwenden

Sub Bilder_einfügen()
Dim targetRange As Range
Dim pictureShape As Shape
Set targetRange = Range("E2")
Set pictureShape = ActiveSheet.Shapes.AddPicture_
("C:\Pictures\"& filname &".png", False, True, 0, 0, -1, -1)
End Sub

Hier habe ich jetzt das Problem, dass mir nicht klar ist, wie ich das Ganze in eine Schleife  _
bekomme und regeln kann, dass mein Bild in einer bestimmten Zelle abgelegt wird. Konkret habe   _
_
ich eine Zeile mit 3 beschrifteten Spalten, wobei in der dritten Spalte der Name des Bildes  _
steht. In der 4. Spalte soll dann das Bild landen.
Wie kann ich mein erstes Makro mit dem zweiten so kombinieren, dass die Bilder direkt eingefügt  _
_
_
werden und nicht nur verknüpft werden.
Vielen Dank für die Hilfe von einem VBA-Neuling, was man sicherlich bei dieser Anfrage merkt.
Viele Grüße
Thomas