Here are a few observations about your code:

1. Worksheets("1") would only have ("1") if the name on the sheet tab is 1.
If you
want the first sheet, whatever it is named, use Worksheets(1) or
Sheets(1).
2. The arguments for Cells are Row, then Column. As written, your code would
copy
something from column H to column AJ in the same row. Is that what you
intended?
3. Most importantly, delete the line Application.CutCopyMode = False