View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Dan the Man[_2_] Dan the Man[_2_] is offline
external usenet poster
 
Posts: 145
Default Moving highlight

This is a great code. Is there a way to only highlight the row without
highlighting the column? And how would one change the color of the highlight?
I'm assuming it is the reference to "ColorIndex", but I'm not clear which
numbers represent which colors.

Thanks!

"Bob Phillips" wrote:

One way


'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target
With .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
.Interior.ColorIndex = 20
End With
End With
With .EntireColumn
.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
With .FormatConditions(1)
With .Borders(xlLeft)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = 5
End With
With .Borders(xlRight)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = 5
End With
.Interior.ColorIndex = 20
End With
End With

.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = 36
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
'the View Code option from the menu, and paste the code in.

--
__________________________________
HTH

Bob

"Michael" wrote in message
...
Hi ,
Is there a way to place a horizontal line accross a spread and have it
step
from row to row?
I have a growing spread sheet with columns A-T and this would make reading
it a lot easier.
Thanks
Michael