Hello,
I have the following VBA code that will save each tab as its own file:
Sub Splitbook2()
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = FalseApplication.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
xWs.Copy...