[RÉSOLU] MACRO AFFICHAGE FORMES SUPERPOSÉES

Thomaz

XLDnaute Nouveau
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 :
upload_2018-1-16_16-42-16.png


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.
 

Pièces jointes

  • TEST.xlsm
    17.9 KB · Affichages: 20

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonsoir Thomaz,

VB:
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.
 

Pièces jointes

  • ThomazTEST Formes- v1.xlsm
    18 KB · Affichages: 25

Discussions similaires

Statistiques des forums

Discussions
311 103
Messages
2 077 046
Membres
242 010
dernier inscrit
Ratovonamana