Hi Tim,

if its a one-off, would it not be easier to use
Edit Goto Special Visible cells only

If this were a one-off operation, I doubt that Michael would be seeking a
programmatic solution and it is even less likely that he would be concerned
with the speed and efficiency advantages of one coded approach over another.
Perhaps, most telling of all, however, was the decision to post the question
in the programming group.

As this is a programming group, how does:

Edit Goto Special Visible cells only

differ from the initially advocated:

Range("A1:D10").SpecialCells(xlCellTypeVisible).Cl earContents ?

Except, perhaps, that the latter additionally defines the range and deletes
the contents.


---
Regards,
Norman