Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Sorting issue
Here is an easy one, but I just can't get it right. I trying to sort data in
a file just opened. But when it get to the sort part I get an "informative" 400 error. Sub GetDataFromFCDBFile() Dim wb As Workbook Set wb = Workbooks.Open("H:\myfolder\MyFile.xls", True, False, , , , True) 'wb.Worksheets("ProdBatch").Cells.copy Destination:=ThisWorkbook.Worksheets("Bulk Batch Lookup").Range("A1") With wb.Worksheets("ProdBatch").Cells .Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("B2") _ , Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False _ , Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:= _ xlSortNormal End With End Sub Anyone? The Doctor |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Sorting issue | Excel Worksheet Functions | |||
Sorting Issue - Any help? | Excel Worksheet Functions | |||
Sorting Issue. Please help | Excel Discussion (Misc queries) | |||
Sorting Issue | Excel Discussion (Misc queries) | |||
sorting issue | Excel Discussion (Misc queries) |