Help with copying from a filtered table

[LGMan]

Hi, I've got a large table of data which contains zones, shops, thier sales figures and thier profit figures, My table is currently sorted by Profit (high to low), and I'm filtering the table by sales over £x, and then by one zone at a time.

My problem is that I need to copy the top 5 into another workbook. This I can do manually by copy and paste values, but how would I do it in VBA since the cell range, since the for one example the range is A1374
A11 contains the column titles, so I need to copy these plus the next 5 rows from the filtered table
Thanks in advance

 

[SkipVought]

hi,

Copy the range.SpecialCells(xlCellTypeVisible)

PasteSpecial xlPasteValues the range into a temp sheet

Then copy the rows you want and paste into your target location

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}