>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.