Edit: it would then seem that you wish to link cells B1:B7 in Sheet1 and Sheet2 so that if any cell in either sheet is changed, the corresponding cell in the linked sheet would change to the new value. If so, you can do as you wish using the two following event handlers:
Copy the first event handler to the clipboard (highlight the entire code, right click inside the highlighted area, and 'Copy'):
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B1:B7"), Range(Target.Address)) Is Nothing Then
Sheets("Sheet2").Range(Target. Address).Value = Target.Value
End If
End Sub
Select Sheet1 and right click the sheet tab at the bottom.
Select 'View Code'.
Paste the event handler into the white editing area to the right (right click inside the area and 'Paste').
Then, copy the following event handler to the clipboard:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B1:B7"), Range(Target.Address)) Is Nothing Then
Sheets("Sheet1").Range(Target. Address).Value = Target.Value
End If
End Sub
Select Sheet2 and right click the sheet tab at the bottom.
Select 'View Code' and paste it into the white editing area to the right, as you did with the first event handler.
Close the VBE (red button w/white 'x' - top right).
Change any value in range B1:B7 in sheet1 and the corresponding cell in Sheet2 will return the same value. Select Sheet2 and change the value in the cell previously selected. The corresponding cell in Sheet1 will now return that value.
Advise if additional modifications are required, or if I missed the point entirely.
============================================
You can do this using VBA fairly easily. I infer you have more than one set of 'linked cells'. Can you provide a list of each set, as well as the sheet names for each component of the set?