Automation Error: The Server threw an Exception

[lucigen]

Hey fellas, so the idea here is doing a sort of a giant set of data in a seperate workbook. Leading up to this point in the code we have xlSht defined as a sheet object, getXcoX is an integer. Last is a little routine to get the desired endpoint. I know for a fact that xlSht and getXcoX are valid since they are used earlier in the program.

xlSht.Activate
    xlSht.Columns("A:M").Select
 
    listMax = last(getXcoX, xlSht)
    'Sorting bit
    xlSht.Sort.SortFields.Clear
    xlSht.Sort.SortFields.Add Key:=Range(Cells(1, getXcoX).Address), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal

It errors out on the last line with the following message:

Runtime error '- 2147417851 (80010105):

Automation error
the server threw an exception

A google search didn't reveal any information about the runtime error with anything related to excel or within my comprehension. Anyone got a clue what that means? I would really like to avoid writing my own sorting algorithim

EDIT: Before anyone stsarts working on this, I think I am an idiot. The Range(Cells(1,getXcoX).address) thing isn't working properly. Don't think too hard on this guy

 

[lucigen]

ok well stupidity aside, I still haven't figured this out yet. The root problem here is not that crazy error in the title, but Sorting in a different workbook, which I still can not figure out how to do.

Any/all help is appreciated greatly

 

[Darkspartan]

Why do you need the XcoX if you are sorting by columns?

 

[lucigen]

The idea is that it is the index of the key for the sort. So if XcoX was 2 then it would sort columns A:M by Column B

 

[shg]

What's the value of getXcoX when the code falls over?

 

[lucigen]

3

I also tried replacing it with just "=Range("C1") to make sure it wasn't any kind of thing there, and it throws the same exception

 

[shg]

I have never seen VBA use that language.

What is your operating environment?

 

[lucigen]

Yea I have never seen it either, other changes resulted in a error 462 "the remote server machine does not exist or is unavailable" This is apparently encountered when trying to deal with a MSWord object (which isn't in my program at all) so I am modifying all the rest of my code to avoid this problem now instead of hitting my head against the wall.

Btw Office 2010 on 32bit Win 7

but yea, case closed, I'm dealing with it another way, thanks everyone for pondering the situation, I appreciate it even if no solution was found.