Extract Hyperlink Address

Hi there,
I am looking for a way to extract the address of a hyperlink stored in a cell.

This following code fills the Public screenShot with the address of the selection when the user clicks 'OK':

Please Login or Register  to view this content.

And this fills the specified Range with the hyperlink on a button_Click event:

Please Login or Register  to view this content.

My question is how do I fill screenShot with the address stored in the hyperlink in the specified cell?

ex:

Please Login or Register  to view this content.

Thanks for the help!

@AlphaFrog - Thanks! That's what I was aiming for.