Hi Bettingman, welcome to the forum.
The issue is that "Cells(1, i - 1)" and "Cells(100, i + 2)" don't reference which worksheet you're using. Even though it's inside the WOrksheets("Sheet2").Range() qualifier, you still need to specify the worksheet for those Cells() references.
Or, more readable:
By specifying the destination after the Copy command, you don't need to put it on a separate line. You also only need to specify the first (top left) cell in the range where you want the data pasted.
Hope that helps!
Bookmarks