Re: $$Excel-Macros$$ Need a Macros to Split spreadsheets

Hi Santhos. Place a folder in desktop. change..according to week.. Sub Macro1() ChDir "C:\Documents and Settings\user\Desktop\week 46" Dim wrksht As Worksheet For Each wrksht In ThisWorkbook.Worksheets wrksht.Select wrksht.Copy ActiveWorkbook.SaveAs Filename:="Account Reciveab

Re: $$Excel-Macros$$ Need a Macros to Split spreadsheets

Hi santhosa, Press Alt +11 Use below --code.. Change accordingly.. Sub Macro1() ChDir "Your Path" Dim wrksht As Worksheet For Each wrksht In ThisWorkbook.Worksheets wrksht.Select wrksht.Copy ActiveWorkbook.SaveAs Filename:= "your path" & wrksht.Name & ".xlsx" ActiveWindow.C