I'm using the following code to sort a range.
ThisWorkbook.Sheets("Area").range("A1:D18").Sort Key1:=range("B2"), Order1:=xlDescending, Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
It works well when I place it in a module, but when I use this code in the...