Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to Sort
Hi all,
I have a worksheet that has 106 columns, some of them have dates, some have text, etc. I want to write a macro to allow users to sort the list in ascending order based on the column of their choice, by asking the user to enter the letter of the alphabet located on top of the column. Im using excel 2003. I dont seem to get the code right yet. I would appreciate it if someone tells me where I went wrong: Sub SORT() code that will select the range to be sorted Ask user which column they want to sort by Dim ColumnToSort as String ColumnToSort = InputBox (Please enter the index of the column you wish to sort by) If ColumnToSort = then Exit Sub End If Here is where Im stuck. I dont know how to use the ColumnToSort as the Key1 I want Key1 to be the cell in Row number 13 and Column ColumnToSort Selection.Sort Key1:=Range(ColumnToSort & 13), Order1:=xlAscending, Header:=xlNo, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Sort Macro | Excel Discussion (Misc queries) | |||
Sort Macro | Excel Discussion (Misc queries) | |||
macro sort | Excel Programming | |||
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
Using Macro to sort without clicking on macro button | Excel Discussion (Misc queries) |