I am trying to accomplish
with
but am getting the error sort reference not valid. Where am i making the mistake?
Thanks
Code:
Sheets("Summary").Select
Range("B8:F24").Select
Selection.Sort Key1:=Range("E8"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
with
Code:
Sheets("Summary").Range("B8:F24").Sort Key1:=Range("E8"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
but am getting the error sort reference not valid. Where am i making the mistake?
Thanks