Excel sheet, email column contains 1145 email, and I want to send mass email to all in BCC. How do I go about that? the email column is "A" column the email lines are 2-1144.
Excel sheet, email column contains 1145 email, and I want to send mass email to all in BCC. How do I go about that? the email column is "A" column the email lines are 2-1144.
Hello and welcome to the Forum.
Assuming you're using Oulook, here's an approach to follow...
Firstly, follow Don's tutorial on sending emails, here: Send Emails from Excel - Automatically and by Hand. That covers the basics including "adding BCC (Blind Carbon Copy) recipients" and you can download a file including the macros.
You can then use the macro "Sub Email_From_Excel_More_Options" and build the BCC address list by adding this code after the DIM statements at the start:
Dim rng As Range, BccList As String
Set rng = Range("A2:A1144")
For Each BccAdd In rng
If Not BccAdd Is Nothing Then BccList = BccList & BccAdd.Value & "; "
Next BccAdd
That will run through cells A2:A1144, adding them to the string BccList (separating them with a ";").
Then replace the line emailItem.BCC = "email3@test.com" with this:
emailItem.BCC = BccList
When you run the macro, it will prepare a test email but with a large list of bcc recipents.
Then you need to go back and modify the macro to correct the To addressee, the Subject and the body (message).
Hope this helps.