Link multiple cells with other cells and sync both ways

[newbie22922792]

Hi,

I have three sheets (Idea_Outline,Demand,Export) that have some cells that should be filled with identically information. To make it easier I would like to sync some cells with one another. If I enter something in K4(Idea_Outline), it should be visible in K4(Demand) and A2(Export), too. If I enter something in A2(Export) it should be visible in K4 & K4, and vice versa.
So far so good I have this working code (plus codes in sheets Demand & Export but slightly changed)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("K4)") Is Nothing Then Exit Sub
    Application.EnableEvents = False
    Sheets("Demand").Range("K4") = Target
    Sheets("Export").Range("A2") = Target
    Application.EnableEvents = True
End Sub

Now I want to add other pairs of cells. How can I do this ? In the same sheet (Idea_Outline) I have also K5, which should be linked to K5 in Demand and B2 in Export.
I also have other pairs of cells in the same sheets. I only know how to write code for one pair of cells (as posted above). Your help is highly appreciated!

 

[Fluff]

Duplicate to: Cross linking of cells in differents sheets with reciprocal syncing

In future, please do not post the same question multiple times. Per Forum Rules (#12), posts of a duplicate nature will be locked or deleted.

In relation to your question here, I have closed this thread so please continue in the linked thread. If you do not receive a response, you can "bump" it by replying to it yourself, though we advise you to wait 24 hours before doing so, and not to bump a thread more than once a day.