VBA - Hyperlink in anderem Tabellenblatt

Sub Daten_in_Liste_kopieren()
Dim Name As String
Dim Kundennummer As String
Dim Ort As String
Dim PLZ As String
Dim Strasse As String
Set Tabellenblatt_Berechnung = ActiveSheet
ActiveSheet.Select
Kundennummer = Range("E1")
Name = Range("E2")
Strasse = Range("E3")
PLZ = Range("E4")
Ort = Range("E5")
Worksheets("TEST").Select
Worksheets("TEST").Range("A1").Select
If Worksheets("TEST").Range("A1").Offset(1, 0)  "" Then
Worksheets("TEST").Range("A1").End(xlDown).Select
End If
ActiveCell.Offset(1, 0).Select
ActiveCell.Value = Date
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Kundennummer
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Name
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Strasse
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = PLZ
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Ort
ActiveCell.Offset(0, 1).Select
---Hier Soll der Hyperlink hin ---
Tabellenblatt_Berechnung.Activate
End Sub