Excel?

[darkshark]

|Coluna 1 |Coluna 2|

|Valor 1 |Valor 1|

|Valor 2 |Valor 2|

|Valor 3 |Valor 3|

|Valor 4 |Valor 4|

|Valor 5 |Valor 5|

|Valor 6 |Valor 6|

|Valor 7 |Valor 7|

|Valor 8 |Valor 8|

|Valor 9 |Valor 9|

|Valor 10 |Valor 10|

|Valor 11 |Valor 11|

|Valor 12 |Valor 12|

|Valor 13 |Valor 13|

|Valor 14 |Valor 14|

|Valor 15 |Valor 15|

how to i return all coluns to array?

i've tested this but... dont work =/

local $excel
Local $oExcel = _ExcelBookOpen($sFile, $sExcelReadmode)
    If @error ThenbReturn @error
$excel = _ExcelSheetActivate($oExcel, "1")

thanks in advance

edit:

i've done!

ty ppl!

Func ExceltoArray($sFile, $excelreadmode = 0)
    Local $oExcel = _ExcelBookOpen($sFile, $excelreadmode)
    If @error Then
        $oExcel.application.quit
        Return SetError(0)
    EndIf
    Local $sArray = _ExcelReadSheetToArray($oExcel, 1, 1, 0, 2, True)
    If @error Then
        $oExcel.application.quit
        Return SetError(1)
    EndIf
    $oExcel.application.quit
    Return $sArray
EndFunc   ;==>ExceltoArray

Edited October 22, 2010 by darkshark