Thanks this works now. I found one error. If there are no "1" or "N/A" in the column then the macro copies every row instead of not copying any.

Can this be fixed?