vba to fetch email id and send emails automatically

Hi
I have a raw data which has to be sorted and for which i have given codes. Once the data is sorted I have given a code to separate sheets based on column (Col I) filter. Below is the same code i have used,

Please Login or Register  to view this content.

Details entered in the Masterdata sheet:

Account Send Code Email ID
80000 PTN [email protected]
80004 RB [email protected]
80064 PTN [email protected]
80068 RS [email protected]
80069 RB-AR [email protected]


Till this point i was able to create. I need your help in sending automatic email via outlook as below,


> Once the sheets are separated with the sheet name (Send code in the masterdata sheet), I want to send email automatically to the corresponding email id. For example,

Sheet- PTN have the details need to be sent to [email protected] automatically with the sheet PTN as attachment,


I also want to input the body of the email every time. I have multiple send code and their corresponding email id in the masterdata sheet.
Please help me with the code.


Many Thanks

Hi abi123

Welcome to the Forum.
In future please view the forum rules before posting. Your post does not comply with rule #3.

3. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the [#] button at the top of the post window.

Unfortunately we are not able to assist until you have corrected this...