how to display my cursor cell content in another cell....

[dh13134]

hi
is there a function that can display the content of whatever cell my cursor
is currently in? for example, A1="Dog", A2="Cat", and A3="Horse". i want cell
D1 to display "Dog" when my cursor is in cell A1, "Cat" when i move my cursor
to A2, and "Horse" when i move my cursor to A3......
thanks

 

[Don Guillett]

Right click sheet tab>view code>insert this. Now when you select ANY cell it
will show in d1. SO, you may want to restrict by using the second one
instead.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("d1").Value = Target
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("a1:a10")) Is Nothing Then Exit Sub
Range("d12").Value = Target
End Sub

 

[dh13134]

VERY, VERY, COOL!!!

thanks much!!
--
dh13134

Right click sheet tab>view code>insert this. Now when you select ANY cell it
will show in d1. SO, you may want to restrict by using the second one
instead.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("d1").Value = Target
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("a1:a10")) Is Nothing Then Exit Sub
Range("d12").Value = Target
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(e-mail address removed)

 

[Don Guillett]

Glad to help