Sending emails with combination of two module

Hi Everyone,

I have an employee list as attached, with manager data in column "V".

Macro is sending separate emails to each manager with an attachment. For example, a manager have 5 employee. Macro is copying that 5 row and pasting into a blank excel file and attaching that excel file to an email and sending it to the manager.

Until here, I am able to do it with below code. It is working.

But now I have a "Sheet2" which I want to do same thing. Filter the manager's employees in Sheet2 and create a second excel file and attach it into that email as well with previous attachment. Basically It will be one email with two excel attachment. Macro needs to match with managers and excel files.

I did the same code to Sheet2 as well but I dont know how to combine these two macro and send one email with two attachment ://

Any idea ?


Thanks a lot !
Orhan

Please Login or Register  to view this content.

Originally Posted by Rekragisao

Orhan,

The thing here is is that both codes are calling the command to generate an e-mail.

What i think you want to do is separate the e-mail part from your code, and make this a singe sub that creates the e-mail and adds both temp files to the email. After you do this just make a Run macro that calls the procedures you need. I would advice to collect the macro's in a singe module as that makes it easier to call them.

I hope this guides you.

Kind regards,

Rekragisao

Thank you Rekragisao for your reply. I just find this code somewhere else :/ So, I am not good at these things unfortunately. I tried to add second code just before the End Sub code in 1st module, but It didnt work. It is creating first files but not moving to second. May I kindly ask to guide me a little bit more how to add both temp files into one email ?

Thanks a lot!
Orhan