Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 90
Default Need a button to click to toggle cell color on/off

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

  #2   Report Post  
Posted to microsoft.public.excel.misc
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


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Toggle Button oddity Dallman Ross Excel Discussion (Misc queries) 3 October 27th 06 08:21 PM
Urgent date/scheduling calc needed jct Excel Worksheet Functions 3 February 24th 06 01:36 AM
Protect Workbook vs Worksheet?? Dan B Excel Worksheet Functions 3 November 7th 05 09:02 PM
Possible Lookup Table Karen Excel Worksheet Functions 5 June 8th 05 09:43 PM
Creating button as cell jpizzle Excel Discussion (Misc queries) 1 June 1st 05 01:22 PM


All times are GMT +1. The time now is 09:02 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"