missing line of code
Now that I re-looked at the code, I found that - at least for the coding that you have posted, which I'm going to assum is mostly complete, it is not setting the objXSheet variable
Set objXsheet = objExcel.Worksheets(1)
I am not sure, since this has always worked for me...