Forum Discussion

nic-nicol's avatar
nic-nicol
Copper Contributor
Jan 17, 2021
Solved

Trying to toggle colour of shapes on mouse click

I'm putting shapes over a picture of a human body so you can click an area, say upper left leg, and it's highlighted, click again returns to transparent so you just see the picture below.   I've go...
excel
Macros and VBA
  • HansVogelaar's avatar
    HansVogelaar
    Jan 17, 2021

    nic-nicol 

    You need only a single macro that you assign to all the shapes:

     

    Sub ChangeFill()
    With ActiveSheet.Shapes(Application.Caller).Fill
        .Visible = Not .Visible
    End With
End Sub

     

    Please note that when the interior of a shape is transparent, you'll have to click on its edge to run the macro; clicking inside the shape won't work (precisely because it is transparent).

HansVogelaar's avatar
HansVogelaar
MVP
Jan 17, 2021

Dr_Woodson1964 

That appears to be an entirely different question. Please start a new question (topic/thread).

  • HansVogelaar's avatar
    HansVogelaar
    MVP
    Jan 17, 2021

    Dr_Woodson1964 

    You have asked an entirely unrelated question in someone else's thread. That is not how a forum should work - it will become very difficult for users searching for help if different users ask wildly different questions in the same thread.

    Please go back to https://techcommunity.microsoft.com/t5/excel/bd-p/ExcelGeneral and click 'Start a New Discussion', then post your question there. Thanks in advance!

Resources