If I understand you code, it looks like you select a variable range to copy from "checks", but your PasteSpecial is to the same range "A1" every time. I'm guessing, the range should be Range("A" & a).