VBA Macro to Send Mutliple Emails to Multiple Contacts with Slightly Different Subject and Body

ak_254

New Member
Joined
Jan 9, 2018
Messages
10
Hi all,

This may be a bit of a long shot but I am trying to create or put together a VBA Macro for package distributions that will send out multiple email notification emails at once to the approriate point of contact each with slightly different subject header based on their location and the body of the email based on what the package contains.

Example:

Data Table:

[TABLE="width: 500"]
<tbody>[TR]
[TD]Content[/TD]
[TD]Customer[/TD]
[TD]Package Number[/TD]
[TD]Qty[/TD]
[/TR]
[TR]
[TD]Apples[/TD]
[TD]Tom[/TD]
[TD]11[/TD]
[TD]1[/TD]
[/TR]
[TR]
[TD]Oranges[/TD]
[TD]Bob[/TD]
[TD]22[/TD]
[TD]3[/TD]
[/TR]
[TR]
[TD]Watermelon[/TD]
[TD]Jill[/TD]
[TD]33[/TD]
[TD]5[/TD]
[/TR]
[TR]
[TD]Apples[/TD]
[TD]Tom[/TD]
[TD]44[/TD]
[TD]7[/TD]
[/TR]
[TR]
[TD]Strawberry[/TD]
[TD]Tom[/TD]
[TD]55[/TD]
[TD]3[/TD]
[/TR]
</tbody>[/TABLE]


Ref Table:

[TABLE="width: 500"]
<tbody>[TR]
[TD]Customer[/TD]
[TD]Neighborhood[/TD]
[/TR]
[TR]
[TD]Tom[/TD]
[TD]Serra Mesa[/TD]
[/TR]
[TR]
[TD]Bob[/TD]
[TD]North Park[/TD]
[/TR]
[TR]
[TD]Jill[/TD]
[TD]Pacific Beach[/TD]
[/TR]
</tbody>[/TABLE]


In this case I want to be able to send out 1 unique email to each customer based on what the content of the package contains. In this case there will be a total of 4 emails being sent out at once.

Tom - Apples (Package 11/44) *Since Tom has 2 packages containing apples it will consolidate the info into 1 email*
Bob - Oranges (Package 22)
Jill - Watermelon (Package 33)
Tom - Strawberry (Package 55)


Example Email for Tom:

----------------------------------------------------------------------------------------------
To: Tom
Subject: Serra Mesa: Package Arrived containing Apples

Body:

Hi Tom,

Your package containing the following info has arrived

[TABLE="width: 500"]
<tbody>[TR]
[TD]Content[/TD]
[TD]Customer[/TD]
[TD]Package Number[/TD]
[TD]Qty[/TD]
[/TR]
[TR]
[TD]Apples[/TD]
[TD]Tom[/TD]
[TD]11[/TD]
[TD]1[/TD]
[/TR]
[TR]
[TD]Apples[/TD]
[TD]Tom[/TD]
[TD]44[/TD]
[TD]7[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]

----------------------------------------------------------------------------------------------

Example Email for Jill:

To: Jill
Subject: Pacific Beach: Package Arrived containing Watermelon

Body:

Hi Jill,

Your package containing the following info has arrived

[TABLE="width: 500"]
<tbody>[TR]
[TD]Content[/TD]
[TD]Customer[/TD]
[TD]Package Number[/TD]
[TD]Qty[/TD]
[/TR]
[TR]
[TD]Watermelon[/TD]
[TD]Jill[/TD]
[TD]33[/TD]
[TD]5[/TD]
[/TR]
</tbody>[/TABLE]

----------------------------------------------------------------------------------------------

Please let me know if you have any questions to better explain the issue.

Any help or point in the right direction is greatly appreciated!
 

Excel Facts

How to fill five years of quarters?
Type 1Q-2023 in a cell. Grab the fill handle and drag down or right. After 4Q-2023, Excel will jump to 1Q-2024. Dash can be any character.

Forum statistics

Threads
1,225,743
Messages
6,186,777
Members
453,370
Latest member
juliewar

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top