Sub xColor()
For r = 1 To Range("AL65536").End(xlUp).Offset(1, 0).Row
If Cells(r, 38) = "A" Then
Range("A" & r & ":IV" & r).Interior.ColorIndex = 1 ' The whole Row's
'Cells(r, 38).Interior.ColorIndex = 1 ' Only the cell in AL
End If
Next
End Sub
"phil2006" skrev:
I need to fill a row with black if the value in the cell in column AL is
the letter "A". How would I do this?
Thanks
--
phil2006
------------------------------------------------------------------------
phil2006's Profile: http://www.excelforum.com/member.php...o&userid=35092
View this thread: http://www.excelforum.com/showthread...hreadid=566554