John Peltier definetly helped me out with this! Here is the code if
anyone is interested


Code:
--------------------
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
ThisWorkbook.Worksheets("Form").Range("J1").Value _
= Target.Range.Value
End Sub
--------------------


--
Chuck N
------------------------------------------------------------------------
Chuck N's Profile: http://www.excelforum.com/member.php...o&userid=27057
View this thread: http://www.excelforum.com/showthread...hreadid=465742