selective copy and paste via command button vba

Hi all,
I am trying to achieve selective copy & paste via command button.

I want to select any cell in column D
e.g. D7

Then I press command button
which will copy relative cell from column J i.e. Cell J7
and paste value in D7

So which ever cell I select in D column that cell will get updated from its relative counterpart from column J when i press command button.
I need help. Basic starting code has been generated but is not ok yet. Sample is attached
Many thanks
Kind regards

Please Login or Register  to view this content.

Hi,

Please find the changes done in the attachment.

Please Login or Register  to view this content.

Hi Moinsk,
Thanks for prompt reply. Its a perfect solution.
Great work. Thanks. I have clicked * to thank you.
kind regards

Hi Solus Rankin,
I agree with you. Your solution is very interesting one and works great.
Thanks for a prompt reply & great work
I have clicked * to thank you
Kind regards

Thank You KK1234

Hi,

Im amazed by the solution! Thank you!

Was wondering how i can copy a whole column rather than a specific cell?

Any suggestions please?

Thank you!!!!