Macro VBA - Ajouter automatiquement une photo depuis lien Hyper

Bonjour à tous,

Je suis encore assez novice en VBA, l'envie d'apprendre mais pas forcément le temps qui va avec !

Je vous explique mon petit problème : En gros j'ai des liens hypertexte situés dans une plage de cellules, et j'aimerai trouver un code VBA qui me permettrait d'automatiquement ouvrir la photo depuis le lien qui se situe puis de la faire apparaître dans la cellule en respectant taille et forme de la ligne.

En trainant sur le web j'ai trouvé cette première macro :

Sub insere_image()
Dim ficimg As Variant
    ficimg = Application.GetOpenFilename(".jpg,*.jpg", , "Choisissez l'image")  ' choix nom du fichier
    ActiveSheet.Pictures.Insert(ficimg).Select ' insertion
    With Selection.ShapeRange
        .LockAspectRatio = False        ' proportions d'origine lorsque vous la redimensionnez
        .Top = ActiveCell.Top           ' haut de la cellule
        .Left = ActiveCell.Left         ' gauche de la cellule
        .Height = ActiveCell.RowHeight  ' hauteur de la cellule
        .Width = ActiveCell.Width ' largeur de la cellule
    End With
    With Selection
        .PrintObject = True             ' l'objet est imprimé en même temps que le document
        .Placement = xlMoveAndSize      ' manière dont l'objet est lié aux cellules
    End With
End Sub

qui me permet en effet d'insérer une photo qui respecte la taille et forme de la ligne/colonne où je suis situé, mais ce code demande à chaque fois le chemin de la photo.

Au départ j'étais parti sur la volonté d'insérer les photos en Commentaire via les liens hypertextes, j'utilisais ce code qui lui prenait bien toute la plage de liens et me permettait d'effectuer l'ensemble des changements en une seule éxécution :

Sub insert_image()
Dim i
For i = 2 to 934

With Cells(i,60)
.AddComment.Visible = True
.Comment.Shape.Fill.UserPicture Application.ActiveSheet.Cells(i,60).Value
.Comment.Shape.Height = 100
.Comment.Shape.Width = 100

End With
Next i
End Sub

J'aimerai beaucoup pouvoir combiner les deux, mais j'ai toujours des erreurs ou autres problèmes !

Si quelqu'un a une idée ou tout conseil, je suis preneur !

Merci d'avance pour votre aide à tous

Très Bonne Soirée