Thanks for help tiger--It gets to this line

.Sheets(1).Range("A1").Copy wsDest.Cells(Rows.Count, "A").End(xlUp).Offset(1)

Then a "debugger" pops up. I'm not sure what the criteria is--I just want the page to copy and paste the entire the into "Sheet2". Is that possible?