>my client need all report can read from EXCEL
>my report as below :
>
>*****
>print by ABC XXX company 22 Jan,1999 10:00am
> AA sales report
>
>invoice no. date amount outstand
>----------- ---- ------ --------
>990001 20/02/99 800 800
>990002 30/02/99 40 100
>
>*****
>
>how can i put it in EXCEL
Hs,
Starting with invoiceno part is easy :) Above that need some .Cell(nRow, nCol).value = ..., font.Bold = .. etc coding.
You could just export your data to excel or copy to ... type xls. Another option is to use Application.Datatoclip and paste in excel. ie: Paste sample :

lparameters tcDataCursor
Application.DataToClip(tcDataCursor,reccount(tcDataCursor),3)  && Paste VFP data to clipboard

oExcel = createobject("excel.application")
with oExcel
 .Workbooks.add
 with .activesheet
   .Cells(1,1).Select && Select where to paste
   .Paste
 endwith
endwith

This method is fast and works with data that's not more than 2000-3000 records.
Cetin