Custom List
Hi, XL2003 Is it possible to sort by a custom list, and have that custom list included in the code, rather than putting the custom list in the ToolsOptionsCustom Lists? Something like the following (which generates an error): Range(Cells(A, 1), Cells(500, 16)).Sort _ Key1:=Range("DueHeader"), Order1:=xlAscending, _ Header:=xlYes, OrderCustom:=("SMT","PCB","FA") Regards - Dave. |
Custom List
One way, without code Put your custom list in cells somewhere and name as (say) myList For testing, your items in col-A and assuming the first item to sort is in A2 =MATCH(A2,myList,0) and copy down Sort against the match'd column Regards, Peter T "Dave" wrote in message ... Hi, XL2003 Is it possible to sort by a custom list, and have that custom list included in the code, rather than putting the custom list in the ToolsOptionsCustom Lists? Something like the following (which generates an error): Range(Cells(A, 1), Cells(500, 16)).Sort _ Key1:=Range("DueHeader"), Order1:=xlAscending, _ Header:=xlYes, OrderCustom:=("SMT","PCB","FA") Regards - Dave. |
Custom List
Hi Peter, Thanks for the suggestion. But I really want to be able to do this with a button click. I have data that I need to be able to sort in a number of different ways, depending on what we want at the time. I have buttons to sort by date, by Customer, by Product, and a few others, and I'd like to have a button for the affore mentioned. I've tried adding the custom list, but that's only garranteed to work on 1 computer, since we can't predict how many custom lists exist on other computers, and hence can't predict which number of custom list to call. Regards - Dave. "Peter T" wrote: One way, without code Put your custom list in cells somewhere and name as (say) myList For testing, your items in col-A and assuming the first item to sort is in A2 =MATCH(A2,myList,0) and copy down Sort against the match'd column Regards, Peter T "Dave" wrote in message ... Hi, XL2003 Is it possible to sort by a custom list, and have that custom list included in the code, rather than putting the custom list in the ToolsOptionsCustom Lists? Something like the following (which generates an error): Range(Cells(A, 1), Cells(500, 16)).Sort _ Key1:=Range("DueHeader"), Order1:=xlAscending, _ Header:=xlYes, OrderCustom:=("SMT","PCB","FA") Regards - Dave. |
All times are GMT +1. The time now is 06:59 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com