Active Cell/Focus
 

I was wondering if there is a buried setting in Excel that allows the cell
that has the current focus to standout.

A user would like to change a setting in Excel so that whatever cell has
focus stands out (I suggested using the name box and/or row/column
indicators, but that's not flying.)

Or, possibly, a macro . . . any one know of anything? Thanks in advance,

Rich

Active Cell/Focus
 

Put the following macro in the worksheet code area:

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

It will color the ActiveCell as yellow.
--
Gary''s Student - gsnu200774


"Rich W." wrote:

I was wondering if there is a buried setting in Excel that allows the cell
that has the current focus to standout.

A user would like to change a setting in Excel so that whatever cell has
focus stands out (I suggested using the name box and/or row/column
indicators, but that's not flying.)

Or, possibly, a macro . . . any one know of anything? Thanks in advance,

Rich

Active Cell/Focus
 

Hi Rich,

Another option is this add in by Chris Pearson

download from http://www.cpearson.com/Excel/RowLiner.htm

Cheers
--
Mifty


"Rich W." wrote:

I was wondering if there is a buried setting in Excel that allows the cell
that has the current focus to standout.

A user would like to change a setting in Excel so that whatever cell has
focus stands out (I suggested using the name box and/or row/column
indicators, but that's not flying.)

Or, possibly, a macro . . . any one know of anything? Thanks in advance,

Rich

Active Cell/Focus
 

Thank you very much - both replies are great answers . . .

"Gary''s Student" wrote:

Put the following macro in the worksheet code area:

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

It will color the ActiveCell as yellow.
--
Gary''s Student - gsnu200774


"Rich W." wrote:

I was wondering if there is a buried setting in Excel that allows the cell
that has the current focus to standout.

A user would like to change a setting in Excel so that whatever cell has
focus stands out (I suggested using the name box and/or row/column
indicators, but that's not flying.)

Or, possibly, a macro . . . any one know of anything? Thanks in advance,

Rich

Active Cell/Focus
 

Thank you very much - both answers are great replies!

"Mifty" wrote:

Hi Rich,

Another option is this add in by Chris Pearson

download from http://www.cpearson.com/Excel/RowLiner.htm

Cheers
--
Mifty


"Rich W." wrote:

I was wondering if there is a buried setting in Excel that allows the cell
that has the current focus to standout.

A user would like to change a setting in Excel so that whatever cell has
focus stands out (I suggested using the name box and/or row/column
indicators, but that's not flying.)

Or, possibly, a macro . . . any one know of anything? Thanks in advance,

Rich

Active Cell/Focus
 

And wipe out all other existing background colors on the worksheet at the same
time.


Gord Dibben MS Excel MVP

On Wed, 19 Mar 2008 08:58:02 -0700, Gary''s Student
wrote:

It will color the ActiveCell as yellow.

Active Cell/Focus
 

Posted before I added some code which is a bit more friendly but Chip Pearson's
RowLiner add-in is the way to go IMO.

See URL in reply by Mifty

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static OldCell As Range
If Application.CutCopyMode = 0 Then
If Not OldCell Is Nothing Then
OldCell.Interior.ColorIndex = xlColorIndexNone
OldCell.Borders.LineStyle = xlLineStyleNone
End If
Set OldCell = Target
OldCell.Interior.ColorIndex = 6
OldCell.Borders.LineStyle = xlContinuous
Else
If OldCell Is Nothing Then
Set OldCell = Target
Else
Set OldCell = Union(OldCell, Target)
End If
End If
End Sub


Gord

On Wed, 19 Mar 2008 09:53:10 -0700, Gord Dibben <gorddibbATshawDOTca wrote:

And wipe out all other existing background colors on the worksheet at the same
time.


Gord Dibben MS Excel MVP

On Wed, 19 Mar 2008 08:58:02 -0700, Gary''s Student
wrote:

It will color the ActiveCell as yellow.