HOW TO CHANGE ROW COLOUR

[adeel via OfficeKB.com]

I want that current row colour with its header change, when i move to nex the
previous row change to default. is it possible.

 

[David McRitchie]

Huh? Some possibilities without a decent
description of what you want to do.

RowLiner Cell Highlighting Add In
http://www.cpearson.com/excel/RowLiner.htm

Conditional Formatting
http://www.mvps.org/dmcritchie/excel/condfmtl.htm

Event Macro
http://www.mvps.org/dmcritchie/excel/event.htm

 

[Guest]

Put the following in the Worksheet coding area:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.EntireRow.Interior.ColorIndex = 6
End Sub

as you navagate with either mouse click or arrow key, the selected row will
be hight-lighted.

 

[Gord Dibben]

Just as long as OP is aware that this will wipe out any currently colored cell
formatting on the sheet.


Gord Dibben MS Excel MVP

 

[Don Guillett]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.FormatConditions.Delete
With Target.EntireRow
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.Color Index = 6
End With

End Sub

 

[Don Guillett]

Spell checker may have changed. Use this

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.FormatConditions.Delete
With Target.EntireRow
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = 20
End With

End Sub