Newbie. Is it possible to get excel to change the colour
of a cell when it is selected by mouse pointer, or arrow
keys, from default white to yellow then revert to white
again when the next cell is selected?

Here's one way

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.FormatConditions.Delete
With Target
.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
End With
.FormatConditions(1).Interior.ColorIndex = 6
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 Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Joe Hannett" <(E-Mail Removed)> wrote in message
news:98ff01c478ac$ec3634e0$(E-Mail Removed)...
> Newbie. Is it possible to get excel to change the colour
> of a cell when it is selected by mouse pointer, or arrow
> keys, from default white to yellow then revert to white
> again when the next cell is selected?

Hi

see:
http://www.cpearson.com/excel/RowLiner.htm

But this kind of event procedure will disbable the UNDO functionality
--
Regards
Frank Kabel
Frankfurt, Germany


Joe Hannett wrote:
> Newbie. Is it possible to get excel to change the colour
> of a cell when it is selected by mouse pointer, or arrow
> keys, from default white to yellow then revert to white
> again when the next cell is selected?

You could use an event macro


Dim OLDCOLOR As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not (OLDCOLOR Is Nothing) Then OLDCOLOR.Interior.ColorIndex = 0
Target.Interior.ColorIndex = 6
Set OLDCOLOR = Target

End Sub




"Joe Hannett" wrote:

> Newbie. Is it possible to get excel to change the colour
> of a cell when it is selected by mouse pointer, or arrow
> keys, from default white to yellow then revert to white
> again when the next cell is selected?
>

Mr Bob Phillips,

Sir you are a gentleman and a scholar. It worked like a charm. Thank
you from my - nearsighted - manager and I! Your help is truly
appreciated.

Joe Hannett.

"Bob Phillips" <(E-Mail Removed)> wrote in message news:<#(E-Mail Removed)>...
> Here's one way
>
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Cells.FormatConditions.Delete
> With Target
> .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
> End With
> .FormatConditions(1).Interior.ColorIndex = 6
> 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 Phillips
> ... looking out across Poole Harbour to the Purbecks
> (remove nothere from the email address if mailing direct)
>
> "Joe Hannett" <(E-Mail Removed)> wrote in message
> news:98ff01c478ac$ec3634e0$(E-Mail Removed)...
> > Newbie. Is it possible to get excel to change the colour
> > of a cell when it is selected by mouse pointer, or arrow
> > keys, from default white to yellow then revert to white
> > again when the next cell is selected?

Thank you for this info Mr Kabel.

As my manager (for whom I have been trying to figure this out for
months) was unaware of even the UNDO facility (!) I reckon this won't
be a problem.

Kind regards
Joe Hannett


"Frank Kabel" <(E-Mail Removed)> wrote in message news:<(E-Mail Removed)>...
> Hi
>
> see:
> http://www.cpearson.com/excel/RowLiner.htm
>
> But this kind of event procedure will disbable the UNDO functionality
> --
> Regards
> Frank Kabel
> Frankfurt, Germany
>
>
> Joe Hannett wrote:
> > Newbie. Is it possible to get excel to change the colour
> > of a cell when it is selected by mouse pointer, or arrow
> > keys, from default white to yellow then revert to white
> > again when the next cell is selected?