Hi John


One way

You can use FormatConditional Formattinguse dropdown for Formula Is
=(ROW()=CELL("Row"))
or
=(COLUMN() = CELL("Col"))
set Format to whatever you wish

In order for this to operate, it will need a sheet event to force a
Calculate, otherwise the changes won't occur

Right click on the sheet tab and choose View Code
Copy and Paste the code blow into the sheet code area. Change Sheet
number to whatever Sheet you are using, I happened to be using Sheet3

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheet3.Calculate
End Sub


--
Regards

Roger Govier


"johnb" wrote in message
...
How do change a cell's interior color when a first gets the focus and
when it
losses the focus. In other words when I first click on a cell is
changes
color and when I click elsewhere it change color.

TIA
johnb