I have a procedure that creates an email and sends to email addresses from a table. I'm sure you could adapt it to pull names from a query. Here is the procedure:
Public Function SendDailyInspection(RepName As String, RepDate As String)
Dim RepRecipients As String
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("Select * from tblEmailRecipients")
If Not (rst.EOF And rst.BOF) Then
Do Until rst.EOF = True
RepRecipients = RepRecipients & rst!EAddress & "; "
MsgBox "There are no records in the recordset"
SendMailAttachment RepName, RepRecipients, RepDate
I can send you the code for SendMailAttachment if you want it. This function will send a report to the email recipients that this function gets from the table.
---In MS_Access_Professionals@yahoogroups.com, <Bill.Singer@...> wrote :
I have a query that pulls the name of all the names of individuals that have an Individual Health Insurance policy with us. The query also pulls the associated email address.
This is all in the standard datasheet view. I am trying to figure out how to get the emails I a format that I can just copy into the address section of a Microsoft outlook email and send out one email to all our customers. (about 100 total)
Is there any way to extract these emails in a format that I can cut and paste into an email?
Posted by: email@example.com
|Reply via web post||•||Reply to sender||•||Reply to group||•||Start a New Topic||•||Messages in this topic (2)|