Macro - sélection plusieurs images - à cacher [Résolu]
Bruno_6539
Messages postés jeudi 10 avril 2014Date d'inscription
18 mai 2015
Dernière intervention
-
19 nov. 2014 à 14:26 - Dernière réponse : Bruno_6539
Messages postés jeudi 10 avril 2014Date d'inscription
18 mai 2015
Dernière intervention
- 19 nov. 2014 à 16:02
Je voudrai faire une macro pour :
- sélectionner une série d'images (une trentaine) : "image 1", "image 2", "image 3"...
- et les cacher toutes en même temps.
J'ai essayé de faire de faire ce test limité à quelques images :
ActiveSheet.Shapes("Image 1", "Image 2", "Image 3", "Image 4").Visible = False Mais cela ne marche pas... Je ne suis pas encore très doué avec VBA...
ucfoutu18039
Messages postés lundi 7 décembre 2009Date d'inscriptionModérateurStatut
11 avril 2018
Dernière intervention -19 nov. 2014 à 14:52
0
Utile
Ou/et si elles ont vraiment et exactement ces noms-là ("Image 1", "Image 2", "Image 3" et "Image 4") rien ne t'empêche de faire une boucle for i = 1 to 4 dans laquelle tu les rends invisible tour à tout ( ActiveSheet.Shapes("Image " & i).Visible = False )
(mais tout cela est vraiment évident)
Bruno_6539
Messages postés jeudi 10 avril 2014Date d'inscription
18 mai 2015
Dernière intervention -19 nov. 2014 à 16:02
0
Utile
MERCIccciiiiiiiiii beacoup !!!!!!
Faire un"boucle" ou utliser un "array" est signe de bonté en VBA... et je suis suffisamment mauvais en VBA pour ne pas trouver tout cela très évident...
Cependant, J'ai réussi à comprendre, puis à faire la bonne macro (que j'ai appelée Cache-cahe) :
Sub Cache_Cache()
For i = 1 To 4
Nom = "Image & i"
ActiveSheet.Shapes("Image " & i).Visible = False
Next i
End Sub et cela marche très bien !! donc je suis heu-reux !
Merci beaucoup ucfoutu , bonne journée ! Cordialement, Bruno
