Copy Paste Row To A New Worksheet

Closed
lin - Aug 19, 2010 at 03:22 AM
rizvisa1 Posts 4479 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - Aug 20, 2010 at 08:40 AM
Hi everyone
i am stuck with this problem, i have 40 lines in my excel spreadsheet..how can i do a macro that it will copy and paste line 1 to 18 to one worksheet and then 19 to 36 to another worksheet and then 37 to the remaining to another worksheet all within the same workbook. i am thinking of doing a loop that is something like this except my example below is not dynamic nor is a loop

Rows("6:23").Select
Application.CutCopyMode = False
Selection.Cut
Sheets.Add After:=Sheets(Sheets.Count)
Range("A6").Select
ActiveSheet.Paste

Sheets("Sheet1").Select
Rows("24:41").Select
Selection.Cut
Sheets.Add After:=Sheets(Sheets.Count)
Range("A6").Select
ActiveSheet.Paste

1 reply

rizvisa1 Posts 4479 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 768
Aug 20, 2010 at 08:40 AM
Would they be new sheets ? It seems all you want is to a group of 18 rows to a new sheets and continue to do so till all rows are done
0