hi

i want to copy a some 3000 random rows (like row3, row
400, row 403, etc) and paste it anohter sheet.

if i record a sample macro here is the code i get (below).
But how do i convert into rows trapped in an array.
i ahve trapped all the desired rows to be copied in an
array....

thanks in advance

Range
("1:1,7:7,8:8,11:11,13:13,18:18,19:19,20:20,23:23" ).Select

Range("A23").Activate
Selection.Copy
Sheets("Sales Aug04").Select
Sheets.Add
Rows("1:1").Select
ActiveSheet.PasteRange
("1:1,7:7,8:8,11:11,13:13,18:18,19:19,20:20,23:23" ).Select

Range("A23").Activate
Selection.Copy
Sheets("Sales Aug04").Select
Sheets.Add
Rows("1:1").Select
ActiveSheet.Paste