There a number of things wrong with the code I suspect a few you introduced when chopping your code up for posting here, e.g. setting the xlsheet object after you have already used it, there not being any data on your newly created sheet etc.
You are using this code in excel and not access...