so this is what i have and it works in that it just sends an email to the first contact in the table, how do i set this to run through all..
Dim MyDB As Database
Dim MyRS As Recordset
Dim OutlookApp As Outlook.Application
Dim OutlookMail As Outlook.MailItem
Set MyDB = CurrentDb
Set MyRS =...