Run a macro when a cell is clicked

Hi

I wanted a macro that will copy the hyperlink text from a source cell to destination cell.

Now I want to run this macro whenever a cell having hyperlink text is clicked. Please help

The macro is below:

Please Login or Register  to view this content.

This code runs on clicking the cell but it is not copying the data.

I want the cell content to be copied to the destination. The above code only takes the control to new cell but does not copy the data from the hyperlink cell.

Please advise

Regards
Paul