> goingtothetop
>
> I am using the code below - different cursors - to copy data from Foxpro to an excel sheet- different columns.
>
> Problem is... I have to click on Save changes... every time I paste and close the workbook.
>
> If I say oExcelObject...Save or SaveAs... it requires overwriting of the main document... which is not required.
>
> Is there a better way forward ?
>
> SELECT Y1Lot
> _VFP.DataToClip()
>
> WITH oExcelObject.Worksheets("Valuations")
> oExcelObject.ActiveSheet.range("A5").select && Paste the Data
> oExcelObject.ActiveSheet.Paste() && Paste the Data
> oExcelWorkbook.close
> ENDWITH
>
> SELECT Y1Valu
> _VFP.DataToClip()
>
> oExcelWorkbook = oExcelObject.Application.Workbooks.Open(cSheet)
>
> WITH oExcelObject.Worksheets("Valuations")
> oExcelObject.ActiveSheet.range("B5").select && Paste the Data
> oExcelObject.ActiveSheet.Paste() && Paste the Data
> oExcelWorkbook.close
> ENDWITH

Why do you want to close and then reopen the workbook. keep the workbook open and save it at the end.

Regards
Tushar