Insert Hyperlink From Browser

I wondered if it would be possible to copy the url from the active page from my browser into Excel using VBA (using a private sub). Something like:


Private Sub Worksheet_Change(ByVal Target As Range)
Dim url As String
'url = the url from my active tab in my browser
If Target.Column = 1 And Not IsEmpty(Target) Then
Target.Offset(, 1).Value = url
End If
End Sub
where e.g. the active url in my browser is http://www.mrexcel.com/forum/forumdisplay.php?f=10.