[vba-excel] - charger une image

Bonjour,

voici mon code :

    Sheets("Scenario").Activate
    Sheets("Scenario").Image1 = Sheets("Image").Img_sc11

en fait, j'ai une feuille "scenario" où je dois pour chaque cas charger une image différente. Ces images se trouvent sur la feuille "Image" mais cela provoque une erreur :

run time error '438'
object doesn't support this property or method

j'ai aussi essayé avec loadpicture :

    Sheets("Scenario").Activate
    Sheets("Scenario").Image1.Picture = LoadPicture(Sheets("Image").Img_sc11)

l'erreur ici est type mismatch

et aussi comme ca :

    Sheets("Scenario").Activate
    Sheets("Scenario").Image1.Picture = LoadPicture(Sheets("Image").Img_sc11.Picture)

l'erreur ici c'est file not found


quelqu'un aurait t'il une solution?
ps: je ne veut pas utiliser de lien physique tel D:/....../sc11.jpg

Merci