Home |
Search |
Today's Posts |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
try:
1.add one coulmn ( assume it would be 10th column ) with row number paste into module For m = 1 To ActiveSheet.UsedRange.Rows.Count Step 50 Selection.AutoFilter Field:=10, Criteria1:="" & m - 1, Operator:=xlAnd, Criteria2:="<" & m + 49 Range("a1").CurrentRegion .Copy Sheets.Add ActiveSheet.Paste ActiveWorkbook.SaveAs your name ActiveWorkbook.Close ActiveSheet.ShowAllData Next m mcg |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Macro recorded... tabs & file names changed, macro hangs | Excel Worksheet Functions | |||
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
how to count/sum by function/macro to get the number of record to do copy/paste in macro | Excel Programming | |||
macro to delete entire rows when column A is blank ...a quick macro | Excel Programming | |||
Start Macro / Stop Macro / Restart Macro | Excel Programming |