View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
JMay JMay is offline
external usenet poster
 
Posts: 468
Default Need a button to click to toggle cell color on/off

Off your worksheet enter into it's code module:

Private Sub CommandButton1_Click()
If ActiveCell.Address(0, 0) < "A1" Then 'Chg to Suit
ActiveCell.Select
Exit Sub
Else
With Range("A1") 'Cng to suit
If .Interior.ColorIndex = 6 Then
.Interior.ColorIndex = xlNone
Else
.Interior.ColorIndex = 6
End If
End With
End If
ActiveCell.Select
End Sub

Add a Command button1 using the Control toolbox
and you're good to go..


"Tonso" wrote:

I know how to toggle say..the grid....on or off, using a button. But,
how do I toggle cell interior color on/off. Specifically, I want to
click on a button and make a "No Fill" cell yellow, or a yellow cell
"No Fill". I am using Excel 2002.

As usual, thanks for any and all help.

Tonso