Re : AIDE pour une Macro SVP
Bonsoir,
En fait dans Feuil1, je stocke les images.
Les images sont positionnées sur des zones de tailles égales :
$A$1:$F$19
$A$20:$F$38
$A$39:$F$57 (elle est vierge, seul le fond est coloré)
Dans Insertion/Nom/Définir, je définis 3 noms Nom1, Nom2 et Nom3 qui correspondent aux zones ci-dessus.
Ensuite, j'ai utilisé l'outil "Appareil photo" qu'il faut aller chercher dans :
Affichage/barre d'outils/Personalisé/commandes.
Catégorie "Outils" (dans la 2eme partie de la zone "Commandes")
Glisser cet outils dans une Barre existante puis cliquer "Fermer"
L'outil "Photo" permet de "photographier" une zone.
Dans la feuille "Interface" selectionner une zone quelconque, cliquer sur l'outils photo puis cliquer ailleurs dans la feuille.
Un objet apparait copie conforme de la zone selectionnée (une réference à cette zone apparait dans la barre de formule).
Redimensionner l'objet obtenu et le placer sur la zone A30:C38 de "Interface".
Dans la barre de formule, remplacer la reference par =MonImage
"MonImage" est un nom (CTRL+F3 pour voir) qui refere à :
=INDIRECT("Nom"&EQUIV(Interface!$B$23;{"EN 13480-3";"CODETI 95";"ASME B31.1"};0))
En fonction de ce qui est saisi en B23, on choisit une des 3 zones de la feuille Feuil1 (Nom1, Nom2, Nom3)
Pour l'effacement de B29, se positionner en B29 et aller dans Format/Mise en forme conditionnelle pour voir la formule.