Something like this perhaps: HTH Otto
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Cells.Font.ColorIndex = 0
Target.Interior.ColorIndex = 3
Target.Font.ColorIndex = 43
End Sub
"Gaurav" wrote in message
...
hey otto.

can we also change the font color?

"Otto Moehrbach" wrote in message
...
Place this macro in your sheet module. You can access that module by
right-clicking on the sheet tab and selecting View Code. Paste this
macro into that module. "X" out of the module to return to your sheet.
I chose the color red by setting the ColorIndex to 3. Change this as you
wish. HTH Otto
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 3
End Sub

wrote in message
...
On Nov 29, 2:19 pm, Aqib Rizvi wrote:
On Nov 29, 2:53 am, wrote:

how will get colur in Cursor position only
for ex: my tex in B8, Cursor also in B8 then only B8 to be change
difference colour, how it will work

please help me
Anshad

Your question is not very clear, can you please give the example.
Thanks
AQIB RIZVI


Dear Aqib Rizvi

My questine is in my worksheet as below:

Name Cont no.

Ahmed 8832875
fiaaz 9878532
Kareem 2354878
Anil 3395874
Vimal 9987582
Nippin 6698574

as like this but when the Cursor in cell that cell to highlight
difference colour, it is possible,