How send a bulk mails with attachment using outlook 2017

To send a bulk email with an attachment using Outlook 2017, you can follow these steps:

Method 1: Using the Outlook Contacts List

1. Open Outlook 2017 and go to the "Contacts" folder.
2. Select the contacts you want to send the email to by checking the boxes next to their names.
3. Right-click on the selected contacts and choose "Send Email" from the context menu.
4. In the "New Email" window, enter the subject and body of the email.
5. Click on the "Attach File" button to attach the file you want to send.
6. Select the file you want to attach and click "Open".
7. Click "Send" to send the email to all selected contacts.

Method 2: Using a CSV File

1. Create a CSV file containing the email addresses of the recipients, one per line, in the format "Name" [email protected].
2. Open Outlook 2017 and go to the "Mail" folder.
3. Click on the "New Email" button to create a new email.
4. In the "To" field, click on the "Address Book" button and select "From File" from the dropdown menu.
5. Select the CSV file you created and click "Open".
6. In the "New Email" window, enter the subject and body of the email.
7. Click on the "Attach File" button to attach the file you want to send.
8. Select the file you want to attach and click "Open".
9. Click "Send" to send the email to all recipients in the CSV file.

Method 3: Using VBA Macro

1. Open Outlook 2017 and go to the "Developer" tab.

2. Click on the "Visual Basic" button to open the Visual Basic Editor.

3. In the Visual Basic Editor, click on "Insert" > "Module" to insert a new module.

4. Paste the following code into the module:

   Sub SendBulkEmail()
    Dim olApp As New Outlook.Application
    Dim olMail As Outlook.MailItem
    Dim olRecipients As Outlook.Recipients
    Dim olAttachment As Outlook.Attachment
    Dim strSubject As String
    Dim strBody As String
    Dim strFilePath As String
    Dim strRecipient As String
   
    strSubject = "Your Email Subject"
    strBody = "Your Email Body"
    strFilePath = "C:\Path\To\Your\File.txt" ' Replace with the path to your file
    strRecipient = "[email protected]" ' Replace with the recipient's email address
   
    Set olApp = New Outlook.Application
    Set olMail = olApp.CreateItem(0)
    Set olRecipients = olMail.Recipients
   
    olRecipients.Add strRecipient
    olRecipients.Resolve
   
    Set olAttachment = olMail.Attachments.Add(strFilePath)
    olAttachment.PropertyAccessor.SetProperty "http://schemas.microsoft.com/mapi/proptag/0x3712001F", "Your File Name.txt"
   
    olMail.Subject = strSubject
    olMail.Body = strBody
    olMail.Send
   End Sub

5. Replace the placeholders with your own values (e.g. subject, body, file path, recipient's email address).

6. Click "Run" to run the macro and send the email to the specified recipient.

Note: Before sending a bulk email, make sure to check with your email provider's terms of service to ensure that bulk emailing is allowed. Additionally, be respectful of recipients' inboxes and avoid sending unsolicited emails.