Access 2007 db upgrading to 2013 - Sendobject | Access forum

Hello Andy,

Hope you enjoyed your Microsoft Access courses with BEST Training. Thank you for your question regarding your database.

The trainer who can best answer this question is available this Friday and will take a look at it then. As it relates to your specific database, your question may be outside the scope of the forum, but we will give guidance based on what you have described.

Should the answer involve more time and complexity (i.e. reviewing your actual database) we would advise of any further time and costs should you want to progress it further on a consultancy basis.

Kind regards,

Richard

Hi Andy,

Thank you for the forum question. If you want to control the formatting in an email you can do it by writing the macro. If you add a module to you database and copy and paste the code below this will create an email and display it. I am using HTML code to control the formatting.



Sub MailToClients()

Dim OutApp As Object
Dim OutMail As Object

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

On Error Resume Next
' Change the mail address and subject in the macro before you run it.
With OutMail
.To = "xx@xxx.xxx"
.CC = ""
.BCC = ""
.Subject = "This is the Subject line"
.BodyFormat = olFormatHTML
.HTMLBody = "<span style=""font-family: Arial; font-size: 16pt;"">This is a test.</span> <br> <span style=""font-family: Arial; font-size: 12pt;"">This is the second line.</span><br><span style=""font-family: Arial; font-size: 12pt;"">This is the Third line.</span>"



' You can attach files by uncommenting the following line.
'.Attachments.Add ("C:\test.txt")
' In place of the following statement, you can use ".send" to
' send the mail.
'.Send
.display
End With
On Error GoTo 0

Set OutMail = Nothing
Set OutApp = Nothing
End Sub

I hope this can guide you in the right direction.


Kind regards

Jens Bonde
Microsoft Office Specialist Trainer

Tel: 0207 987 3777
Best STL - https://www.stl-training.co.uk
98%+ recommend us

London's leader with UK wide delivery in Microsoft Office training and management training to global brands, FTSE 100, SME's and the public sector