Erik,

Put this code in the Sheet1 worksheet code module

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Worksheets("Sheet2").Range(Target.Address).Value = _
Target.Value
End Sub

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Erik" wrote in message
...
I have two identical sheets. If something is entered into a cell in
sheet1, how do I get excel to automatically enter the same value into an
identical cell in sheet2 and do this on a cell by cell basis not as a copy
of a range of cells? Any help is greatly appreciated.