Memo field is truncated to 254 when I use COPY TO or the following code...

oXLS = createobject("Excel.Application")
oS.application.displayalerts = .F.
loWorkBook = oXLS.application.workbooks.open(lcTemplateFile)
oXLS.activesheet.range("A6").select
oXLS.activesheet.paste
loWorkBook.saveas(lcFichier)
oXLS.application.quit()

Someone knows another way to export without truncate memo fields?
Thank you in advance for your help.