Pasting Cells with Filter on

  • Thread starter Thread starter Glenn
  • Start date Start date
G

Glenn

When I am using Auto - Filter and I copy a selection of cells and try to
paste them into another column, it appears to ignore the filter and pastes
the rows as if the filter weren't turned on. So, instead of the data only
going only into the visible rows where it belongs, it goes into the rows
hidden by the filter.

Is there a way around this?
 
set rng = Range("A2:A20").Specialcells(xlVisible)
for each ar in rng.areas
ar.offset(0,12).Value = ar.Value
Next
 
Back
Top