Remplacer une image par une autre en VB

Bonjour,

J'aimerai savoir comment on peut coder en VB pour Excel un truc du style :

si la reponse est exact dans la cellule
alors on remplace l'image de la cellule du dessus dans excel par une autre image.

Je sais pas si je suis clair... mais si vous pouviez m'aider. Merci

If         'Ton test
'Ta cellule
valeur si vrai
ActiveSheet.Pictures.Insert( _'ton chemin d'accés img vrai       "
valeur si faux
ActiveSheet.Pictures.Insert( _'ton chemin d'accés img faux        "
End if


FFkiller