The difficult I do immediately, the impossible takes a little bit longer.

A way to send eMail to multiple recipients using DoCmd.SendObject and a little code...

Private Sub SendeMail()

     Dim rs As Recordset
     Dim vRecipientList As String
     Dim vMsg As String
     Dim vSubject As String

          Set rs = CurrentDb.OpenRecordset("SELECT * FROM qryYourQueryWitheMailAddresses ")
          If rs.RecordCount > 0 Then
                  If Not IsNull(rs! YoureMailAddressField ) Then
                      vRecipientList = vRecipientList & rs! FieldThatHoldsTheeMailAddresses & ";"
                 End If

             Loop Until rs.EOF

             vMsg = " Your Message here... "
             vSubject = " Your Subject here... "

             DoCmd.SendObject acSendReport, " rptYourReport ", acFormatPDF, vRecipientList, , , vSubject, vMsg, False
             MsgBox ("Report successfully eMailed!")

             MsgBox "No contacts."
     End If

End Sub
Send eMail to Multiple Recipients...
I use this code behind each form because the same forms are used to filter specific reports to specific Users...
1. Copy and paste the below in the Forms Module...

2. Set up your Query (see Figure A) from your Table (mine is Figure C), changing the field names to match your own, and change the areas marked in blue to correspond to your fields and your report. (You can use the same query to create a form, see Figure B, and add or subtract the Users you want to receive the report.)

3. In the On_Click event of your Command Button (orange arrow) put...

    Call SendeMail

SELECT tblUsers.ueMail FROM tblUsers INNER JOIN tbleMailRecipients ON tblUsers.uUserID = tbleMailRecipients.erUserID WHERE (((tbleMailRecipients.erReportID=5));

Note...  Using DoCmd.SendObject does limit your vMsg to 255 characters.  If you want to send more you will need to use Outlook Automation.