Problème annuler importation d'image

[jiby]

Bonjour à tous !

J'ai un petit soucis qui ne devrait pas être trop compliqué pour les pros dont regorgent ce forum !

Dans mon fichier excel j'ai deux boutons pour importer des images différents.
Voici la macro pour le 1er bouton, pour le deuxième seul les coordonnées changent.

Sub ImporterPhotoComposant()

Application.Dialogs(xlDialogInsertPicture).Show


Dim Emplacement As Range
 
 
Set Emplacement = Range("E2")
Set objImg = ActiveSheet.DrawingObjects(ActiveSheet.Shapes.Count)
 
With objImg.ShapeRange
    .LockAspectRatio = msoFalse
    .Left = 470
    .Top = 385
    .Height = 100
    .Width = 100
End With
End Sub

Mon problème est que lorsque j'ai déjà une image dans la feuille, que j'exécute la macro, et que j'annule grace à la fenêtre windows, l'autre image déjà présente bouge aux coordonnées de la macro alors que je voulais juste annulé l'opération.

Mon fichier Excel joint vous expliqueras un peu mieux.

Je pense qu'il faut juste que je rajoute une condition mais je n'arrive pas à trouver laquelle.


Merci d'avance pour votre aide,

Jiby