Thanks this is perfect!

On more question. I need a macro to scan through column I, and if there is a "1" then copy the row with the "1" in it and also copy one row below and paste both rows into a new sheet. Is it possible for this to be done?