Exporting Excel worksheet in multiple workbooks

**cheiL** · 07-05-2011, 01:11 AM

Hi there

I have a task to export multiple excel worksheets into multiple workbooks, I don't think it is possible but I am also not too familiar with macros and how they work- I am still learning
Wondering if this is possible and if somebody could advise me on how and where to start look to get me started
I have tried googling it but to no avail

Thanks

**royUK** · 07-05-2011, 01:19 AM

What do want to do? Split each sheet from one workbook to separate workbooks?

**cheiL** · 07-05-2011, 05:03 PM

Hi yes that is exactly what i am trying to do, split each sheet from one workbook into multiple workbooks, is that possible?

**cheiL** · 08-31-2011, 05:36 PM

found the solution on a different forum

code below


Sub Macro5()
For i = 1 To ActiveWorkbook.Worksheets.Count
Sheets(i).Copy 'to new workbook
Set NewWks = ActiveSheet
With NewWks.Parent
Application.DisplayAlerts = False
.SaveAs Filename:="C:\Macros\" & NewWks.Name & ".xls"
Application.DisplayAlerts = True
.Close SaveChanges:=False
End With
Next i
MsgBox "Done!"

    Range("H41").Select
    ActiveWindow.Close
End Sub

moderator please close this thread

Thanks