Open VBA editor then double click on the Sheet that you want to apply transferring cell values. And select the Worksheet on module and Change event then write this code there.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$A$1" Then Range("A2").Value = Target.Value
End Sub
to change A2 cell value to A1 value when A1 changed.
regards
suat
This message was edited by smozgur on 2002-03-14 12:12