Sometimes you've got one workbook with lots of sheets when what you really want is lots of workbooks with one sheet each. This video shows how to split them with a dash of VBA.
Sub Splitziez()
Dim strPath As String
strPath = "Location of your file"
For Each sheetz0r In ThisWorkbook.Sheets
sheetz0r.Copy
Application.ActiveWorkbook.SaveAs Filename:=strPath & "\" & sheetz0r.Name & ".xlsx"
Application.ActiveWorkbook.Close False
Next
End Sub
Watch video How to split an Excel workbook into multiple files online without registration, duration hours minute second in high quality. This video was added by user learnexcel.video 22 June 2017, don't forget to share it with your friends and acquaintances, it has been viewed on our site 44,043 once and liked it 213 people.