Hoe maak ik een plaatje (legenda) wel of niet onzichtbaar, liefst met een macro?

[Lengerke]

Ik heb:
werkblad AAA
plaatje b23 dat staat op werkblad BBB
Dat plaatje moet door de gebruiker oproepbaar / te verwijderen zijn middels een knop met macro of op een andere creatieve manier. Hij moet steeds op de zelfde plaats staan.
Zelf kan ik het plaatje niet doorzichtig maken minnen Excel, dat zou het handigste voor mij zijn. Dan kan ik een macro maken die het plaatje compleet transparant maakt en eentje die het totaal ontransparante maakt. Dat lukt me niet, dus kijk ik nu naar iets anders.
Weet iemand raad?
Alvast bedankt!

 

[SjonR]

Dit vraagt om een voorbeeldbestandje.

 

[HSV]

Transparant of niet.

Plaatje weer normaal = 0.5

sheets("BBB").shapes(1).pictureformat.brightness =1

Zichtbaar of niet.
Zichtbaar =true.

sheets("BBB").shapes(1).visible =false

Onder een knop wordt dit:

sheets("BBB").shapes(1).visible =not sheets("BBB").shapes(1).visible

 

[Lengerke]

Gelukt!

Dag HSV,

Ik heb jouw manier niet gebruikt, maar het heeft me wel op een ander idee gebracht dat ook werkte (de hoogte van de afbeelding naar 0 brengen).
Bedankt voor het meedenken!

Lengerke

 

[HSV]

Fraai is het niet, zo'n streep in je werkblad.