XL 2013 VBA envoi mail avec lien hypertexte

Bonjour le forum,
Pas très douée en vba, j'ai monté une macro en piochant des idées dans différents fichiers. Elle fonctionne trés bien pour l'envoi des mail , je fais référence à une cellule qui a un lien vers un autre fichier, le chemin se copie bien dans le mail mais je n'arrive pas à ce que le lien soit actif .( le chemin est en 7)

ci dessous le code
Set M = olApp.CreateItem(olMailItem)
With M
.Subject = "Alerte" ' Objet
.htmlbody = C.Offset(, -3).Value & " échéance : " & C.Value & " " & C.Offset(, 7).Value
.Recipients.Add C.Offset(, -5).Value
.Send

En espérant ne pas être trop confuse
Merci pour votre aide