Put False after wksSheet.Select.

PS Can you add code tags when posting code?