remplacer image par une autre

Bonjour j'effectue une copie de format d'une feuille vers une autre via PasteSpecial xlPasteFormat .
Chacune de ses feuilles contient un logo. Sur la feuille ou je colle tout est copié sauf le nouveau logo du coup j'applique plus loin dans mon code ceci
Code:

1 2 3 With ActiveSheet.Shapes("Image 1") .AddPicture (logoPath) End With
Mais la méthode ne semble pas exister pour cet objet que faut-il que j'utilise?
Merci

[Edit]
Je précise que l'ancien logo est toujours présent alors s'il est possible de remplacer son contenu se serait parfait :D