Visible column row copy and paste

adamsm · Mar 9, 2011

Hi,

The following code copies any row whether hidden or visible from the column in the code to the sheet "database"

Code:

InvoiceWks.Range("A16:A" & m).Copy 
databaseWks.Range("E" & r & ":E" & (r + m - 16)).PasteSpecial Paste:=xlPasteValues </pre>

How could it be made to copy only the visible column row?

CharlesH · Mar 10, 2011

HI,

see if this line of code helps.

Code:

InvoiceWks.Range("A16:A" & m).SpecialCells(xlCellTypeVisible).Copy