Hi Martin,
This is the equivalent of Edit >> GoTo >> Special >> Visible Cells Only
To do this in VBA, select the range that contains the list (or replace the word "Selection" with a reference to the range), then use the following statement to copy only the visible (filtered) cells:
[tt]
Selection.SpecialCells(xlCellTypeVisible).Select
[tt]
Good luck, SteveB.