LOCAL oExcel as excel.application
LOCAL oWorkbook as Excel.workbook
oExcel = CREATEOBJECT("excel.application")
oWorkBook = oExcel.Workbooks.Open("c:\cezar3.xls")
oWorkbook.Sheets(1).Select
WITH oWorkbook.Sheets(1)
FOR i = 1 TO 64
? .cells(i,1).text
endfor
ENDWITH