Excel Sort

[Kiti]

#include <ExcelCOM_UDF.au3>
WinActivate("Microsoft Excel - Book1")
$oExcel = _ExcelAttach("Microsoft Excel - Book1", "Title")
_ExcelSort($oExcel, "A", 1, 1, 25, 1, 2)

Locodarwin's UDF. I have a bunch of numbers from A1 to A25. Anyone know why they are not sorted from smallest to largest? The script looks ok to me...

[PsaltyDS]

#include <ExcelCOM_UDF.au3>
WinActivate("Microsoft Excel - Book1")
$oExcel = _ExcelAttach("Microsoft Excel - Book1", "Title")
_ExcelSort($oExcel, "A", 1, 1, 25, 1, 2)

Locodarwin's UDF. I have a bunch of numbers from A1 to A25. Anyone know why they are not sorted from smallest to largest? The script looks ok to me...

...aaaaaand what happens when you run it? You didn't really post it for someone ELSE to test for you?

[Kerros]

@Kiti

My guess is that AutoIT is not attaching to the Excel file. Place an _ExcelWriteCell("Test",2,2) after the attach and you will see that it's not attaching.

Now WHY it's not attaching is something I haven't figured out.

[Kiti]

...aaaaaand what happens when you run it? You didn't really post it for someone ELSE to test for you?

Anyone know why they are not sorted

I think I said what happens... they are not sorted?... Yes, this happens!

@Kiti

My guess is that AutoIT is not attaching to the Excel file. Place an _ExcelWriteCell("Test",2,2) after the attach and you will see that it's not attaching.

Now WHY it's not attaching is something I haven't figured out.

It's actually attaching. The "Test" is there on B2 when I run it. There is something wrong with the Sort function I think (in my script)

[PsaltyDS]

I think I said what happens... they are not sorted?... Yes, this happens!

It's actually attaching. The "Test" is there on B2 when I run it. There is something wrong with the Sort function I think (in my script)

More specifically, _ExcelSort() returns 0 and sets @error if things go wrong, you should also see errors on the SciTE console if an object call failed. What were those results?

Edit: Catching errors in _ExcelSort():

#include <ExcelCOM_UDF.au3>
WinActivate("Microsoft Excel - Book1")
$oExcel = _ExcelAttach("Microsoft Excel - Book1", "Title")
$iRET = _ExcelSort($oExcel, "A", 1, 1, 25, 1, 2)
$iErrSav = @error
$iExtSav = @extended
If $iRET Then
    MsgBox(64, "Success", "Success")
Else
    MsgBox(16, "Error", "Error: $iRET = 0, @error = " & $iErrSav & ", @extended = " & $iExtSav)
EndIf

Edited June 17, 2008 by PsaltyDS

[Kiti]

Any ideeas, PsaltyDS?

Edit: I got it thank you anyway. Instead of "A" as the second sort parameter it should've been "A1"

Edited June 17, 2008 by Kiti