Macro to e-mail different sheets in a single mail to e-mail addresses present in excel sheet

[swetamies]

Existing Macro:- I have an existing macro with a send Email button on clicking it will send separate mails with single attachment to all the owner.present in the excel sheet.


Requirement:- while clicking on send mail button it should first pick an owner i.e. mail recipient from coloum D of "List of Data Providers" tab and then should look for all attachments associated with that so that instead of sending multiple mails to 1 person with a single attachment we can send a single mail with all the attachments associated with them.

I need this on urgent basis if anyone has any suggestions, I would love to hear them.

Columns from where I need to pick up the details are:-

No	RAS Metric	Name	Email	CC	Country	Name2
6.2	Regulatory Engagement	Sweta	Sweta.Gupta@gmail.com		India	Sweta Gupta
6.3	Open Regulatory Findings	Sweta	Sweta.Gupta@gmail.com		India	Sweta Gupta
6.1	Non-compliance with laws	Sweta	Sweta.Gupta@gmail.com		India	Sweta Gupta

<colgroup><col><col><col><col><col><col span="2"></colgroup><tbody>
</tbody>

Thanks,
Sweta

 

[Michael M]

It would help to see the existing macro....but something like this needs to be included BEFORE you loop through your recipient list.

ans = MsgBox("Will you need to add further attachments ??", vbYesNo)
        If ans = vbYes Then
            AttachFileName = Application.GetOpenFilename("Files (*.**)," & _
                                "*.**", 1, "Select File", "Open", True)

 

[swetamies]

It would help to see the existing macro....but something like this needs to be included BEFORE you loop through your recipient list.

ans = MsgBox("Will you need to add further attachments ??", vbYesNo)
        If ans = vbYes Then
            AttachFileName = Application.GetOpenFilename("Files (*.**)," & _
                                "*.**", 1, "Select File", "Open", True)

I don't want any pop up to ask for attachment, it just pick the attachments with a single mail id, attach all in one mail and send it automatically