Hello guys,
I hope you are all well.
I have a vba script which includes an image link from mega cloud.
I tried to execute the vba code through which i would send an email with the image, but the image
wouldn't open.
Could anybody advise me about any correction i shall make to my code..
Thanks a lot. 

 Sub Hasan()
Const Pic As String = "https://mega.nz/file/egBRwRCZ#712txbJsNKJ9CymbBNVjqyvGzQApvgvAyz731wJBb2Q"
With CreateObject("Outlook.Application").CreateItem(0)
    .Display
    .To = "[email protected]"
    .Subject = "picture"
    .HTMLBody = "<img src='" & Pic & "'" & .HTMLBody
    '.Send
End With
End Sub