Merci de la réponse, mais entre temps j'ai trouvé le code qu'il faut. Ca ressemble à ce que tu a mis mais en plus complet:
sub MontrerMasquer()
If ActiveSheet.Shapes('Rectangle 51').visible=true then
ActiveSheet.Shapes('Rectangle 51').visible=false
else ActiveSheet.Shapes('Rectangle 51').visible=true
end if
end sub
Avec cette macro, je peux masquer ou montrer l'objet... et ça marche au poil pour ceux que ça intéresse..
Par contre, je n'ai pas trouvé le moyen de changer le nom de l'objet qui est donné par excel (rectangle 1 ici). Si quelqu'un peut me dire comment faire...
A bientôt...
A bient