Userform Macro to Use Textbox input to Generate blank rows.

Holger the first application seems to work as desired. I now am looking to create a hyperlink between the cell the "Textbox" is inserted in and the row generated for it. Ex. "Text4" goes to cell A10 and will generate the 4th row in the sequence. I want the user to be able to click cell A10 and it take them to its respective row. The following is the current code I have so far

Private Sub SUBMITFORM2_Click()

Dim lngCounter As Long

With Sheets("New Template")
    .Cells(7, 1).Value = Text1.Value 'sends user selection to module
    .Cells(8, 1).Value = Text2.Value
    .Cells(9, 1).Value = Text3.Value
    .Cells(10, 1).Value = Text4.Value
    .Cells(11, 1).Value = Text5.Value
    .Cells(12, 1).Value = Text6.Value
    .Cells(13, 1).Value = Text7.Value
    .Cells(14, 1).Value = Text8.Value
    .Cells(7, 4).Value = Text9.Value
    .Cells(8, 4).Value = Text10.Value
    .Cells(9, 4).Value = Text11.Value
    .Cells(10, 4).Value = Text12.Value
    .Cells(11, 4).Value = Text13.Value
    .Cells(12, 4).Value = Text14.Value
    .Cells(13, 4).Value = Text15.Value
    .Cells(14, 4).Value = Text16.Value

  For lngCounter = 1 To 16
    .Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Value = Controls("Text" & lngCounter).Value 'sends user selection to module
  Next lngCounter
End With

Unload Me

End Sub