Thanks, Sergey

I'll try it


>Check http://www.berezniker.com/content/pages/visual-foxpro/excel-finding-last-row-column-or-cell
>
>>Gregory
>>Good solution.
>>Suppose the worksheet had an indeterminate number of rows > 5K?
>>How would you establish the range?
>>
>>
>>>>Thanks to all contributors this great thread.
>>>>
>>>>This is of general interest and useful to a lot of people IMHO:)
>>>>
>>>>By the way is there a trick to do just the opposite? i-e feed a table-like set of MS-Excel cells as a VFP array in order to avoid cell-per-cell parsing when downloading the content of a heavy sheets via com (I am not discussing ADO or ODBC here).
>>>>
>>>>François
>>>
>>>Sure - see message#1519015
>>>
>>>

>>>	local obj, sheetObj
>>>	obj = createobject('Excel.Application')
>>>	=m.obj.workbooks.Open('D:\tmp\1.xlsx')
>>>	sheetObj= m.obj.WorkBooks(1).Sheets(1)
>>>	
>>>	local aa[1]
>>>	aa = m.sheetObj.Range(m.sheetObj.Cells(1,1), m.sheetObj.Cells(2,5)).Value
>>>	
>>>	sheetObj= null
>>>	=m.obj.Quit()
>>>	obj = null
>>>	
>>>	assert .f. && look in the debugger
>>>