Hi Fred

Copy this event in the sheet module

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A1").Value = Cells(Target.Row, Target.Column).Address(False, False)
End Sub

In A1 you see the address now

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Fred" wrote in message ...
Hello,
Does anybody know how to display the Row and Column of an Active Cell and
display it in another cell.

Regards,