Here is one approach
Code:
Dim strSubject As String
Dim strBody As String
Dim strReport As String
Dim strTo As String
Dim strCc As String
Dim strBcc As String
strSubject = "Insert Subject Line Here"
strBody = "Insert text to be displayed in the email body"
strReport = "rptEquip"
strTo = "you@gmail.com"
strCc = ""
strBcc = "me@gmail.com"
DoCmd.SendObject acSendReport, strReport, acFormatTXT, strTo, strCc, strBcc, strSubject, strBody, False
The very last word in the example is False. This parameter is supposed to either send the email without the user reviewing it or open the object so the user can edit it and send it at their will. I can't remember if you want False or True. Having said that, some people complain that the parameter at the end (True or False) is ignored by some version of Outlook.
If you have to, you could try another method. One might be to create a Macro using the Email option within the Ribbon.
Another method is to instantiate an Outlook Object and automating. This requires a little more VBA.
Maybe something like this
https://www.accessforums.net/forms/c...tml#post225174