In a macro I have

;;; Lines
;;; not shown..
Range("A5").Select
Selection.Sort Ket1:=Range("C5"), Order1:=xlDescending, Header:=xlguess, _
OrderCustom:=1, Matchcase:=False, Oreintation:=xlToptoBottom
End Sub

Prior to the lines shown above my spreadsheet shows
A B C D
5 Bank LocNumber DepAmt DepDate << my Headers
6 WC 0000000000 44.00 12/01/05
7 WC 0000000000 38.00 12/01/05

After the above Code runs it is reflecting:

A B C D
5 Bank LocNumber DepAmt DepDate << my Headers
6 WC 0000000000 44.00 12/01/05
7 WC 9541211111 600,000.00 12/06/05
8 WC 9541211111 598,000.00 12/21/05

and so on down to $1.00

Why is it NOT CHANGING/CONSIDERING ROW 6?

TIA,

Jim