Aide Code vba : " on supprime une image s'il y en avait une"

Bonjour

je suis débutant dans les codes vba et j'aurai besoin d'aide.

Voici le code vba que j'ai créé:

Sub P2_ZM()

Dim MonDossier As String
Dim TypeImage As String
Dim NomPhoto As String

MonDossier = "D\Audit\photo\Zone machine\"
NomPhoto = Range("K24")
TypeImage = ".jpg"

ActiveSheet.Shapes.AddPicture Filename:=MonDossier & NomPhoto & TypeImage, _
linktofile:=msoFalse, savewithdocument:=msoTrue, Left:=580, Top:=0, Width:=500, Height:=590

End Sub

Cependant les images se superposent à chaque fois que j'active ma macro.
De plus, est-il possible d'afficher mon image dans une cellule bien précise ?

En vous remerciant d'avance pour votre aide

EDIT : Ajout des balises de code (la coloration syntaxique). Explications disponibles ici : ICI Merci d'y penser dans tes prochains messages.