right click on sheet tabview codeinsert thissave workbook

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Address = "$A$1" Then [b1] = Target
If Target.Address = "$B$1" Then [a1] = Target
End Sub

"Rocky Bryant" wrote in message
...
Hello,

Is there a way for me to link cell A1 and B1 together
such that when user inputs 10 into A1, B1 = 10. AND when
user input 25 into B1 then A1 = 25?

thanks for any help or advice...

Rocky