=========
QUESTION
———
How do I open a new email message from VBA?

 

=========
ANSWER
———
See EXAMPLES

 

=========
EXAMPLES
———
Dim olLook As Object 'Start MS Outlook
Dim olNewEmail As Object 'New email in Outlook
Dim strContactEmail As String 'Contact email address

Set olLook = CreateObject("Outlook.Application")
Set olNewEmail = olLook.createitem(0)
strEmailSubject = "TopSellers.accdb Application"
strEmailText = ""
strContactEmail = NAME@DOMAIN

With olNewEmail 'Attach template
.To = strContactEmail
'.CC = strCc
.body = strEmailText
.subject = strEmailSubject
'.attachments.Add ("S:\Email template\Information Templatev3.xls")
.display
End With

 

=========
APPLIES TO / KEY WORDS
———
Microsoft Access
VBA
Email Message
Outlook

 

=========
REF
———
http://www.access-programmers.co.uk/forums/showthread.php?t=142373 

 


http://www.anysitesupport.com/access-how-do-i-open-a-new-email-message-from-vba/
http://anySiteHosting.com