Trying to understand workbook's behavior but really lost. Where is the code that fails?

Do need to end a copy/paste operation with:

Application.CutCopyMode = False
Then can set focus wherever you want.