Cetin -

Thanks for your suggestion. Unfortunately I still can't get it to work. A direct cut and paste of your line ie.

.UsedRange.Sort(oSheet.Range("B2"),xlDescending,oSheet.Range('C2'),,xlDescending,oSheet.Range('E2'),,xlGuess,,.F.,xlTopToBottom)

with only minimal change to fit my situation ie.

oSheet.range("A6:W155").Sort(oSheet.Range('B2'),xlDescending,oSheet.Range('C2'),,xlDescending,oSheet.Range('E2'),,xlGuess,,.F.,xlTopToBottom)

produces a syntax error when it runs. The constants are of course initialized beforehand and the code is all on one line.

I've also tried it with the constants input directly and both variations of the "False", .F.

Could it be a difference in versions of excel? I'm running 10.2614.2625.