vba to send email to multiple IDs where the email id in seperate worksheet and dynamic

Hi All

Can someone help me sorting this out?

My requirement is as below:

* Send an attachment in outlook mail to the list of email ids in a worksheet
* the no of email ids is going to be dynamic as the value gets pulled from some other code
* so based on the email ids updated on the range, i want send ("SheetTobeSent") sheet to the listed email ids in "EmailID" Sheet.

Sampel xl attached.

Note: I have managed to send the mail but the it picks only the first cell value, whereas I want to send email to all the ids specified in EMailID sheet.

Thanks in advance!

Best
Rem0

Hi Xladept

Thanks for looking in to this as well!

The above code sends separate mail to each which I can use for some other request, thanks for the solution.

However, my current request is to send the SheetToBeSent sheet info to all the recipients in EmailID sheet as a single mail, i.e. i want to add them all to To address.

Best
Rem0

Hi Xladept

Any luck with the above?

To send one email to multiple recipients whose id will get populated in the SheetToBeSent sheet, i want all the ids to be added to the To list in outlook.

Thanks in advance!

Best
Rem0

Hi Xladept

Thanks for the updated code, but its not working for me.

Moreover i don't want to click on the message box to send email every time and even if i select yes still nothing happening results in application error: 1004.

My exact requirement is i want to add each mail id in the sheet to To address and then send a single mail. i think we need to use the outmail option to avoid that message box.

As a workaround i thought it might be helpful for me if i can concatenate all the email id to a single cell and then i can refer that cell to send email as in my existing code it adds the ids of first cell to TO address.

so my current request would be to design a code to concatenate all id of the EMAILID sheet to a single cell the concern is i want perform concatenation till end of the row of id column.

Thanks
Rem0