msh
03 de Junio del 2005

quiero pasar el contenido de un campo memo que son direcciones a una hoja de excel directamente. por favor el que tenga la respuesta me lo haga llegar lo mas rapido posible, se trata de localizar a personas

Manuel
03 de Junio del 2005

objExcel=CREATEOBJECT("excel.application")
objexcel.Workbooks.Add
i=0
Select tuTabla
Go top
do whil !eof()
i=i+1
tuVariable=alltrim(TuCampoMemo)
objExcel.Cells(i,1).Value=tuVariable
Endi
objExcel.Visible=.t.
*Lo anterior te pasa el memo a Excel, en todos los registros.