VBA code to save files

I have created a code to create report from my existing data. i have to create two reports. all working fine.. But only one thing i am not able to do.. Please help me on executing the code together to get two separate report saved separately without changing any thing in the original fie. I have attached both codes and the sample excel file. Please help me with the code.

First, make certain the SUBs in module1.pdf are differently named from those in module2.pdf.

Example : If Module1 has a sub named CheckTitles and Module2 has the same named sub ... simply add the number "2" to the end of the sub name in Module2.

Module1 : Sub CheckTitles ()
Module2 : Sub CheckTitles2 ()


Paste all of your code from Module1.pdf into a Routine Module in your workbook.

Paste all of your code from Module2.pdf into a separate Routine Module in your workbook.

At the very bottom of you pasted code in Routine Module1, place a 'call' to the first sub located in Routine Module 2.


Here is the very last of the code from Module1.pdf :

Please Login or Register  to view this content.

The first sub located in Routine Module2 is named " DOWNLOAD_STATUS "

So at the very bottom of the last sub in Routine Module1 it would look like this :

Please Login or Register  to view this content.

Yes, I did but again the original file closed after the first report get saved.

I don't see anything in your code that tells either module to close the workbook.

????

thats what i was also wondering why it is closing

Corrupted ?