Norman,

Thank you! This did the trick. There's so many secret sanity savers in
Excel's Object Model! I really appreciate your timely advice.

Damian


"Norman Jones" wrote:

Hi Damian,

Try something like:

Sub Tester()
Dim rng As Range
Dim rng1 As Range
Dim destRng As Range

Set rng = Sheets("Interview").AutoFilter.Range

Set rng1 = rng.SpecialCells(xlCellTypeVisible)

Set destRng = Sheets("Sheet2").Range("A1")

rng1.Copy
destRng.PasteSpecial , Paste:=xlValues

End Sub


---
Regards,
Norman