Åben Notesdokument fra Excel

Hvordan kan man åbne et notesdokument fra excel ??
Jeg har en knap i mit excel dokument som skal finde et notesdokument og åbne det. Jeg finder dokumentet, men hvordan får jeg det åbnet ??

Min Excelknap indtil videre:
Private Sub CommandButton2_Click()
Dim session As Object
    Dim db As Object
    Dim view As Object
    Dim doc As Object
    Dim uidoc As Object
   
    Set session = CreateObject("Notes.NotesSession")
 
    Set db = session.GetDatabase("Server1", "Viden\Dokumentation\EdbProjDok.nsf")
    'MsgBox db.Title
    opgavenr = ActiveWindow.ActiveCell.Value
    'MsgBox opgavenr
    Set view = db.GetView("(Fase1PrOpgaveNr)")
    Set doc = view.GetDocumentByKey(opgavenr, True)
End Sub