Toggle button

[Bertha]

Is it possible to turn a cell into a toggle button?

Thank you for helping out,

Bertha

 

[mikerickson]

Change the code to

If .Value ="Y" Then
    .Interior.Color = RGB(0, 255, 0)
Else
    .Interior.Color = RGB(255, 0, 0)
End If

 

[Bertha]

Thank you Mike, that worked fine when I removed the lines:

If .Value Then
.Interior.Color = RGB(0, 255, 0)
Else
.Interior.Color = RGB(255, 0, 0)
End If

I will lose the colours, as I do not know how to set them (green for Y and red for N), but that is OK, I am happy with the Y/N instead of True/False.

Bertha

I managed to set the colour of cells containing Y to green and the colour of cells containing N to red dynamically via conditional formatting. Thank you for the earlier suggestion to do it that way.

Bertha

 

[Bertha]

Change the code to

If .Value ="Y" Then
    .Interior.Color = RGB(0, 255, 0)
Else
    .Interior.Color = RGB(255, 0, 0)
End If

Thank you! I tried something like:

If .Value =""Y" Then
.Interior.Color = RGB(0, 255, 0)
If .Value =""N" Then
.Interior.Color = RGB(255, 0, 0)
End If

After I noticed that didn't work I managed to assign colours via Conditional Formatting, but thanks for this example of how it can be done without Conditional Formatting.