Marvin, Use this code change Column "A" for your filtered column.
Range("A2",Range("A2").End(xlDown)).EntireRow.Spec ialCells(xlCellTypeVisible).Copy Worksheets("YourSheet2").Range("A1")

--
Charles Chickering

"A good example is twice the value of good advice."


"Marvin" wrote:

How can I programatically identify the range of rows displayed by filtered
data? I programatically provide the filter value, and then need to copy the
results to another sheet.

Thanks.