make a form, and a list box of the clients/emails.
make a query that uses the selected clientID in the listbox as criteria. like qry
qsClientPurchases as: select * from table where ClientID = forms!fMyForm!lstBox
the report would use this query and only report on the 1 client selected in the list box.
a button on the form can then cycle thru the list of emails and sent them 1 at a time to the chosen client:
A listbox , lstRpt ,has the reports to pick to print...
Code:
sub btnRun_click()
dim vClientID, vEmail, vSubj, vBody
vRpt = "rClientReport"
'listbox col1 = clientID, col2= email
For i = 0 To lstBox.ListCount - 1
vClientID= lstBox.ItemData(i) 'get next user in list
lstBox = vClientID 'set the list
vEmail = lstBox.Column(1) 'get the email from the list in column(2), in vb columns begin with zero
vBody = "body of email"
vSubj = "your report"
'then send the email
DoCmd.SendObject acSendReport, vRpt, acFormatPDF, vEmail, , , vSubj, vBody
Next
end sub