Gord, this is great code;
the code however prevents me
from doing any copy/cut and
paste rountines;
How can I do both?
TIA,



"Gord Dibben" <gorddibbATshawDOTca wrote in message
:

You could download Chip Pearson's ROWLINER add-in as Dave suggests.

Or use event code

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Static OldCell As Range
If Not OldCell Is Nothing Then
OldCell.Interior.ColorIndex = xlColorIndexNone
End If
Target.Interior.ColorIndex = 3
Set OldCell = Target
End Sub

Note: this is sheet event code. Right-click on the sheet tab and "View Code".

Copy/paste into that module.

If not what you're looking for, post back.


Gord Dibben MS Excel MVP

On Sat, 14 Oct 2006 11:08:02 -0700, Shen wrote:

Can the active cell be made to automatically appear in color instead of
white. The purpose would be help your eye locate the cell when moving thru
the sheet.

Gord Dibben MS Excel MVP