Send an e-mail with an attachment using Access

[newuser1980]

Hey,

I am in the process of writing some VBA code that will do the following:

1) Create and send an e-mail using Outlook with an excel file attached. The excel files are present in a specified folder.

Any help to accomplish this will be highly appreciated.

Thanks.

[MMcCarthy]

Hey,

I am in the process of writing some VBA code that will do the following:

1) Create and send an e-mail using Outlook with an excel file attached. The excel files are present in a specified folder.

Any help to accomplish this will be highly appreciated.

Thanks.

Excel has a sendMail command

    Set wb = ActiveWorkbook
    With wb
        .SendMail "email address", _
            "Subject line"
        .Close False
    End With
 

You would have to nest this into a loop to run through and open each of the excel files.

Mary

[mattkorguk]

Hi,
I've always used this:

 On Error GoTo cmdEmail_Err
    DoCmd.SendObject acSendQuery, "qryName", acFormatXLS, "", "", "", " See attachment", "", True, ""
cmdEmail_Exit:
    Exit Sub
 
cmdEmail_Err:
    MsgBox "You cancelled and did not send the email", vbExclamation
    Resume cmdEmail_Exit
 
    DoCmd.SetWarnings True
    Me.Refresh
 

Hope that helps.
Matt