I asked the same question the other day and was given the following code bu
JulieD which worked a treat for me.

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Static Roww As Integer
Static NotFirstTime As Boolean
Application.EnableEvents = False
If NotFirstTime Then ' remove color fill from prior row
Range(Cells(Roww, 1), Cells(Roww, 10)).Interior.ColorIndex = xlNone
Else
NotFirstTime = True
End If
Range(Cells(Target.Row, 1), Cells(Target.Row, 10)).Select
Roww = Selection.Row ' save current row for uncoloring when row exited
Selection.Interior.ColorIndex = 4 ' color current row
Application.EnableEvents = True
End Sub

The following code was also provided by Bob Phillips which also worked a
treat (Please noter that comment that Bob has inserted after the code!!)

'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target.EntireRow
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
With .FormatConditions(1)
With .Borders(xlTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = 5
End With
With .Borders(xlBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = 5
End With
End With
.FormatConditions(1).Interior.ColorIndex = 20
End With

End Sub


'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select




"RagDyer" wrote:

Just click on the row number in the row header.

You might also want to check this out:

http://www.cpearson.com/excel/RowLiner.htm

--

HTH,

RD
==============================================
Please keep all correspondence within the Group, so all may benefit!
==============================================

"kcholly" wrote in message
...
If I'm working in a cell, is there a way to high light the entire row so you
can follow it to the column you want.