G
Guest
I've used this code for awhile, & it HAD worked.
But NOT now.
Range("DTop").Select
Selection.Sort Key1:=Range("AJ65"), Order1:=xlDescending, Header:=xlGuess _
, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Is there another way to ensure a Sort??
TIA - Bob
But NOT now.
Range("DTop").Select
Selection.Sort Key1:=Range("AJ65"), Order1:=xlDescending, Header:=xlGuess _
, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Is there another way to ensure a Sort??
TIA - Bob