Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.Color = 1 ’provide numeric color value here that
will ‘appear as background color of 'the selected cell
End Sub

That permanently changes the cell colors, so you'd end up with a
"trace" of the previously selected cells. Hardly what the user wants.

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Sun, 01 Feb 2009 07:51:05 GMT, "Chris Bode via OfficeKB.com"
<u49096@uwe wrote:

In excel 2007, the color range is light that is why it is quite difficult to
see the selected cell. If you prefer to use macro to resolve this problem ,
then the solution could be like this

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.Color = 1 ’provide numeric color value here that
will ‘appear as background color of 'the selected cell
End Sub

Hope you get it

Have a nice time

Chris
------
Convert your Excel spreadsheet into an online calculator.
http://www.spreadsheetconverter.com