Originally Posted by Gasman
I would have thought you would need to use .HTMLbody ?
I have done that, many thanks for the pointer as you can see below, highlighted in green
'email script for MTM Report
Public Sub CreateEmailWithOutlookMTM()
'bits for the attachment
Dim myPath As String
Dim strReportName As String
todayDate = Format(Date, "DDMMYY")
myPath = "G:\GENERAL\Databases\Handover\Reports\MTM\"
strReportName = "MTM Handover" & " " & todayDate & ".pdf"
' Create a new email object
Set olApp = CreateObject("Outlook.Application")
Set olMailItem = olApp.createitem(olMailItem)
' Add the To/Subject/Body to the message and display the message
.To = "email@example.com"
.cc = ""
.Subject = "MTM Handover"
.HTMLBody = "<html><body><font face=calibri>Hi All,<br> Please see the database<a href=#G:\GENERAL\Databases\Handover\Handover Database.mdb#> Here</a></font></body></html>"
.Attachments.Add myPath & strReportName 'FileName"
.Display ' Displays before sending the message
' Release all object variables
Set olMailItem = Nothing
Set olApp = Nothing
just have one last question, the link is displayed in the email but when you click it nothing happens, is that to do with the file path ??