VBA code that will save all sheets in workbook to seperate workbooks

Hi Guys,

I have a weekly report that is automatically generated for cost over every department in our company.

Each department have their own worksheet and there cost code is the Tab Name.

What I wanted to know is this. Is it possible to use some VBA code that will copy each worksheet and save them to individual files? Is this possible?

For example.

If I had one worksheet with the tab name of sheet1 and another called sheet2.

Then the code was save these two sheet into seperate workbooks with the filename sheet1 and another file called sheet2.

Thanks in advance.

Thank you so much for your help Antonio.

I take it I just apply this code as a module so that can be applied to the whole workbook?

Thanks again.

hacker47, have you ever thought of answering a question with help instead of a promotion of your software?