This is a modification of the READEXCEL() UDF by Kdyer
I wanted to be able to read and filter the array later in the script without having to read the source file over and over... But I am doing something wrong.

Thank You for your help!
Code:

FUNCTION READEXCEL($cfilename)
DIM $Rc,$Column,$Cell,$oXL,$a[300],$b[300]
;$a=1,2,3,4,5,6,7;columns and order to be read
IF 0=EXIST($cfilename) ;insure the file exists
?'Excel file not found'
SLEEP 4
RETURN ;leave
ENDIF
$oXL=Createobject('Excel.application')
;Check to insure that Excel is available
IF 0<>@error ?@error ' Excel Application is not found'
SLEEP 4
RETURN
ENDIF
$Rc=$oXL.workbooks.open($cfilename)

For $Column=0 to 6
For $cell=0 to 300;ubound($a)
$b[$column,$cell]=$oXL.cells($column,$cell)
Next
Next

$oXL.quit ;quit Excel
$oXL=0 ;set the object to 0