How to email a hyperlink using VBA

[Lockrin]

Hello, I have a button on a form that sends an e-mail out. In the "Message Text" section I need to add a hyperlink. I can add the text but it doesn't know to actually make it a hyperlink. Here is what I have:



Dim stMsg As String
Dim Hyp As Hyperlink

Hyp = "http://atf-appserver03/atftoday/opx/Shared%20Documents/Scoreboards/Scoreboard%20-%20Beam%20Fabrication%20(Count).xlsx"



If Me.Hyperlink.Value = "-1" Then
stMsg = "See attached file and Link Below " & Chr$(13) & _
Chr$(13) & Chr$(13) & _
Hyp
Else
stMsg = "See attached file"
End If

DoCmd.SendObject acSendReport, "rptBeamCount", acFormatPDF, "Jason Yoho; Jim Gilbride; John Toth; Ryan Lochner", , , _
"NGNN Status Update", stMsg



Thanks in advance

[Lockrin]

I realized later that even though it does not show up as a hyperlink, once it has been sent it will change to a hyperlink. I found this out after I gave up............ Thank God its friday.