[RÉSOLU] MACRO AFFICHAGE FORMES SUPERPOSÉES

[Thomaz]

Bonjour à vous,

Je sèche sur un problème, et je viens donc chercher votre aide.

Mon projet est :
- Quand on clique sur la forme carrée du CAMION A, sa Fréquence contenue dans un rectangle s'affiche.
- Quand on clique sur la forme carrée du CAMION B, sa Fréquence contenue dans un rectangle s'affiche.

La macro est la suivante :

Le problème est le suivant :
les rectangles indiquant les réponses doivent être superposés. Les formes sont superposées et je souhaite que la réponse passe toujours au premier plan par rapport à l'autre forme (indiquant l'autre réponse).

Pouvez-vous m'aider, svp ?
Par avance merci.

 

[mapomme]

Bonsoir Thomaz,

Sub Rectangle1_Cliquer()
   ActiveSheet.Shapes("Rectangle à coins arrondis 6").Visible = True
   ActiveSheet.Shapes("Rectangle à coins arrondis 6").ZOrder 0
End Sub
Sub Rectangle2_Cliquer()
   ActiveSheet.Shapes("Rectangle à coins arrondis 3").Visible = True
   ActiveSheet.Shapes("Rectangle à coins arrondis 3").ZOrder 0
End Sub

Voir fichier joint.

 

[Thomaz]

MERCI ma Pomme!!
Impeccable!
Excellent journée !