>>Basically, memo value could be transferred to Excel by following way:
>>

>>cMemovalue=mytable.memofield
>>oExcel=CREATEOBJECT('Excel.Application')
>>oExcel.workbooks.add
>>WITH oExcel.workbooks[1].activesheet
>>	for nLoop=1 TO MEMLINES(cMemovalue)
>>		.range('A'+TRANSFORM(nLoop)).value=MLINE(cMemovalue,nLoop)
>>	endfor
>>endwith
>>oExcel.visible=.t.
>>

>
>That may work for one record cursor.

Add scan, and you will get it for all records.