Hi John,

This may do what you want, in the worksheet code module.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target < Range("H3") Then Exit Sub
Range("A3:K3").Interior.ColorIndex = xlNone
If Range("H3").Value < 0 Then
Range("A3:K3").Interior.ColorIndex = 37
End If
End Sub

HTH
regards,
Howard

"John K" wrote in message
...
I have a spreadsheet and I want to have cells colored from column A to K if
cell h is not blank. So if h3 has a date in it I want A3:K3 to be say
light
blue. This is for Office 2003. I can do it with conditional formating in
2007, but my work place doesn't have 2007. I did use column L and put an
if
statement to give a true or false in the cell depending on if the cell in
col. h was empty or not. Any ideas how to get this to work?