Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sort WorkSheetName unknown
How can I make the following work on any worksheet and on whatever the new
range might be "A11:Axxx" - "A11:Jxxx" Range("A11").Select ActiveWorkbook.Worksheets("JAN").Sort.SortFields.C lear ActiveWorkbook.Worksheets("JAN").Sort.SortFields.A dd Key:=Range("A11:A68") _ , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("JAN").Sort .SetRange Range("A10:J68") .Header = xlYes .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Finding a string of unknown length in a string of unknown length, Help! | Excel Discussion (Misc queries) | |||
Copy from 1 worksheet to multipule worksheets based upon worksheetname | Excel Programming | |||
HELP! Unknown range | Excel Worksheet Functions | |||
Changing Worksheetname | Excel Discussion (Misc queries) | |||
worksheetname in a cell | Excel Programming |