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.
>
Anyone who does not go overboard- deserves to.
Malcolm Forbes, Sr.