Hey
Wondering if you guys could help me out.
I have a massive data dump, that I filter for XYZ intially in one colunm and then sort in another colunm. I want to copy the top 10 after both actions
Windows("source.xlsx").Activate
ActiveSheet.Range("$A$1:$BR$5114").AutoFilter Field:=20, Criteria1:="XYZ"
ActiveWorkbook.Worksheets("ALL OPEN ").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("ALL OPEN ").AutoFilter.Sort.SortFields.Add Key _:=Range("J1:J5114"), SortOn:=xlSortOnValues, Order:=xlDescending, _DataOption:=xlSortNormal
End With
Rows("1:10").Select "This is where I am getting stuck - I know I need to change 10 to something else."
Selection.Copy
The weekly data changes, so it is very possible that the top 10 will not be in the same row positions.
Thanks
Bookmarks