In the following code, the macro gives a runtime error 1004: application or
object defined error at the Selection.Sort command.

Sheets("Data").Select
Cells.Select
Selection.Font.Bold = False
Selection.Sort Key1:=Range("A2"), Order1:=xlDescending,
Key2:=Range("B2") _
, Order2:=xlDescending, Header:=xlYes, OrderCustom:=1,
MatchCase:=False _
, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal,
DataOption2:= _
xlSortNormal


The macro works fine for me with Excel 2003, but not for my friend who has
Excel 2000. Is there something in the code that could be removed and still
let the macro function on his pc?

Or is there a setting in his Excel that needs to be changed to allow this to
work?

Thanks!