Hi Guys:
I work it out. It is very simple. one line of code is enough
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Sheet2.Cells(2, 2) = Sheet1.Cells(Target.Row, Target.Column) End Sub
simply copy the sub to the sheet you want to click and change the receiving sheet number and cell address.
Chris Hou |