Hyperlink in macro

[recius]

Goeie middag,

Ik heb 2 excel bestanden, in het ene staan alle orders en in het ander is een overzichtpagina van een aantal gevens van de orders.

Ik heb de volgende code voor het uitlezen van een aantal gegevens van de orders voor de overzichtpagina:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Const BookName As String = "Worksheet.xls"

Dim i As Long
Dim TempStr As String

With Workbooks(BookName)
For i = 2 To Workbooks(BookName).Worksheets.Count
TempStr = "='[" & BookName & "]" & .Sheets(i).Name & "'!"
Cells(i, 3).FormulaR1C1 = TempStr & "R1C8"
Cells(i, 4).FormulaR1C1 = TempStr & "R4C4"
Cells(i, 5).FormulaR1C1 = TempStr & "R8C5"
Cells(i, 6).FormulaR1C1 = TempStr & "R9C5"
Cells(i, 7).FormulaR1C1 = TempStr & "R7C2"
Next
End With
End Sub

De gegevens die moeten worden geplaatst in de desbetrefende cells worden allemaal prima uitegelezen. Het 1e gegeven (Cells(i, 3).FormulaR1C1 = TempStr & "R1C8") is het ordernummer (wat overgens ook de sheetnaam is in het bestand waar alle orders in staan), nu is mijn vraag hoe ik het voor elkaar kan krijgen dat dit een hyperlink wordt die dan naar de sheet gaat van die order.

Thnx in advance :thumb: