Sorting a range on another worksheet without selecting the worksheet
I have two worksheets, 'Project Rank' and 'WorkOrders'.
The named range 'pick.pn' is one cell located on 'Project Rank' and the named range 'wo' consists of several rows located on 'WorkOrders'. The following code works fine from any worksheet in the file: Sub AutoSort() Application.Goto Reference:="wo" Selection.Sort Key1:=Range("AB6"), Order1:=xlAscending, Key2:= _ Range("P6"), Order2:=xlAscending, Key3:=Range("O6"), Order3:=xlDescending _ , Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _ xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _ DataOption3:=xlSortNormal Application.Goto Reference:="pick.pn" End Sub But I shouldn't have to use the Application.Goto lines of code should I? Why can't the following work (from any worksheet in the file): Sub AutoSort() Worksheets("WorkOrders").Range("wo") Selection.Sort Key1:=Range("AB6"), Order1:=xlAscending, Key2:= _ Range("P6"), Order2:=xlAscending, Key3:=Range("O6"), Order3:=xlDescending _ , Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _ xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _ DataOption3:=xlSortNormal Worksheets("Project Rank").Range("pick.pn") End Sub I've tried and I get a Run-time error 1004: Select method of Range class failed message. Help appreciated. |
All times are GMT +1. The time now is 08:08 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com