Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sorting excel sheets
Hi,
I'm trying to sort an array sheet using vbscript. I've tried several possibilities, but to no avail. Below the code I wrote. It seems correct to me, but for some reason my application just hangs without giving me an error so I don't see what's going wrong... (The excel-file exists, so that cann't be the problem) Const xlWorkSheet = -4167 Const xlLineMarkers = 65 Const xlNormal = -4143 Const xlLeft = -4131 Const xlCenter = -4108 Const xlRight = -4152 Const xlAscending = 1 Const xlYes = 1 Const xlStroke = 2 Const xlSortColumns = 1 sTemplateFile = Server.MapPath("\test") & "\report-template.xls" sTargetFile = Server.MapPath("\test") & "\report.xls" 'Create an instance of Excel Application Set oExcelApp = Server.CreateObject("Excel.Application") 'Open template Set oExcelWkb = oExcelApp.Workbooks.open(sTemplateFile) 'Save copy in download folder oExcelWkb.SaveAs sTargetFile, xlNormal 'Specify worksheet set oExcelSht = oExcelWkb.worksheets(1) ' this is what i've tried so far: oExcelSht.Range("B11:M281").Sort oExcelSht.Range("E11"), 1 oExcelApp.Selection.Sort oExcelApp.Range("E11"), 1, , , , , , 0 oExcelSht.Columns("B:M").Sort oExcelSht.Range("E11"), 1, , , , , , 0 oExcelSht.Range("B11:M281").Sort oExcelSht.Range("E1") 'Calling a macro to sort isn't an option Set oExcelSht = Nothing oExcelWkb.close true Set oExcelWkb = Nothing oExcelApp.Quit Set oExcelApp = Nothing |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
sorting sheets | New Users to Excel | |||
sorting protected sheets | Excel Worksheet Functions | |||
Sorting sheets | Excel Discussion (Misc queries) | |||
Sorting the order of sheets by the name | Excel Programming | |||
Sorting sheets | Excel Programming |