Mirror multiple cells in different sheets

I'm trying to create code that mirrors specified cells in different sheets of the same Excel document. For example, I enter something in A1 in one sheet, I want it to be automatically entered at D6 in another sheet, and vice versa. This is the code I've been trying to adapt for my purposes:

In Sheet1 and Sheet2 modules:

Please Login or Register  to view this content.

In a standard module:

Please Login or Register  to view this content.

This code is adapted from others - the code runs but doesn't mirror cells as intended. My programming aptitude modest at best so it's likely there is something very simple that I'm missing. Any help is appreciated!

Cheers,

Andrew