Superposition d'images

Bonjour à tous.

Ce site est une mine d'or!

Aider et se faire aider est une devise en diamant !

Je voudrais exposer mon problème, souhaitant une solution adaptée.

J'ai un fichier avec deux listes deroulantes. Chaque choix de ma liste, m'affiche l'image correspondante. Ainsi de suite

pour toutes les listes. Mon probleme est que les images "s'accumulent" les unes sur les autres!... Elle se superposent ! CE QUE JE

SOUHAITE EVITER ! Donc, une astuce pour effacer l'image précédente et ne garder q'une seule.

Merci à tous, merci pour votre collaboration .

NB:Fichier joint: le programme Excel 2010 + Le fichier contenant les images.

temcom, le forum,

Dans la macro AfficheImage1, section "Gérer la superpostion", tu utilises d'autres variables que celles de AfficheImage, d'où la superposition.

Enlève le 1 à la fin de ces mots :

MonObjet

MonImange

Picture

LaCéline

Bonjour et merci pour votre reponse.

Dans le VBA

j'ai 2 modules pour les macros.

Module 1: Procedure Name: AfficheImage

Module 2: Procedure Name: AfficheImage1

Cela me permet de jouer avec les liste déroulantes et m'afficher les images correspondantes.

Si dans le second module, je supprime le "1", j'ai un message d'erreur "Nom Ambigue détecté:: AfficheImage"

En remettant le "1"... tout rentre dans l'ordre mais j'ai fatalement des images qui s'accumulent les unes sur les autres!

Merci pour la tentative.

temcom, le forum,

Je n'ai peut être pas été suffisamment explicite.

Modifier seulement dans la section "Gérer la superpostion" de la macro AfficheImage1

      'Gerer superposition
200   Set MonObjet = ActiveSheet.DrawingObjects

210   For Each Monimage In MonObjet 'On cherche tout
220       If Left(Monimage.Name, 7) = "Picture" Then 'Si trouvé, On les supprimes
230           Monimage.Select
240           Monimage.Delete
250       End If
260   Next

LaCéline

Mil merci pour LaCeline..... Bravo.

Tu me sauve la vie!

Cela fait 1O jours que je bataille !

Merci encore et bonne continuation.