Sorry, no title on previous one............

Hi All..........

I recorded this macro in XL03 and it works fine, in mine, and another 03,
but crashes in two different XL97's on the line starting with
"Selection".........yet other macros in the same book work ok on those
97's.......


Sub SortByWorkorder()

Range("A13").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Sort Key1:=Range("D14"), Order1:=xlAscending, Header:=xlGuess,
_
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("a14").Select
Range("D11").Select
End Sub

any advice will be appreciated.........

Vaya con Dios,
Chuck, CABGx3