Hi Rusty

From my understanding of your question you have one check box in A1 and when it is checked you what the whole of column J to go red, if so, right mouse click on the check box and choose view code and then copy & paste the following into the procedure that is created it should give you what you want:

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
ActiveSheet.Columns(10).Font.ColorIndex = 3
Else
ActiveSheet.Columns(10).Font.ColorIndex = 1
End If

End Sub

---
If i've misunderstood the question please let us know.

Cheers
JulieD

"Rusty" <rustysmail@adelphia.net> wrote in message news:ttqdnUyKqqtKvGLcRVn-hg@adelphia.com...
Sub CheckBox3_Click()
'
' CheckBox3_Click Macro
' Macro recorded 2/1/2005 by Geo. Z'
' Keyboard Shortcut: Ctrl+z
'
ActiveCell.Offset(-13, 2).Range("A1").Select
Selection.Font.ColorIndex = 3
End Sub


What I'm trying to do is when the box is checked in "A" the text in "J" is red, Unchecked = black, down the hole sheet.
I think the "Active cell" line is where to start?
thanks for any help..