The macro runs and I can see it reads in the files and it stops at the next thing and that is sorting.
Unfortunately I think it is a non-compatibility issue of an older excel with a code that is for a newer version. The bad news is that even if we sort this out it may be some other code lines that will become an issue in Excel 2003.
I don’t have an older Excel to confirm this theory but I have found that the code line I used it has been introduced in Excel 2007 as long before that it was a different code.
See the following.
http://www.mrexcel.com/forum/excel-...ding-macros-07-excel-attempting-run-03-a.html
Excel 2007 or later code:
ActiveWorkbook.Worksheets("playernames13byname").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("playernames13byname").Sort.SortFields.Add Key:= _
Range("A2:A50000"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption _
:=xlSortNormal
With ActiveWorkbook.Worksheets("playernames13byname").Sort
.SetRange Range("A1:C50000")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
Based on information the equivalent code in Excel 2003 should be:
ActiveWorkbook.Worksheets("playernames13byname").Range("A2:C50000").Sort _
key1:=Range("A1"), order1:=xlAscending, DataOption1:=xlSortTextAsNumbers, _
Header = xlYes, _
MatchCase:=False, _
Orientation:=xlTopToBottom, _
SortMethod:=xlPinYin
I can’t really help you on this because it would require rewriting all sorting codes and it is full of it.