Code VBA

Bonjour,

J'ai une macro qui fonctionne parfaitement bien pour envoyer un courriel avec Excel. J'aimerais intégrer un lien SharePoint d'un fichier Excel, mais je ne trouve pas comment inscrire le code.

Quelqu'un peut m'aider ?

Sub EnvoyerCourrielNouveauCandidat()
            
    Dim LeMail As Variant
    
      
    Set LeMail = CreateObject("Outlook.Application")

    With LeMail.CreateItem(olMailItem)
        .Subject = "Nouveau candidat ajouté"
        .BCC = Range("H1")
        .htmlbody = "Bonjour" & ",<br><br>" & _
                    "Un candidat a été ajouté :" & "<br><br>" & _
                        Worksheets("FORMULAIRES").Range("E6").Value & "<br><br>" & _
                    "Belle journée!"
                    
        .Display
    End With
    Range("E6").Select

End Sub

Merci beaucoup !