SELECT SomeFields FROM WhatEver INTO CURSOR ExcelData *-- copy data to clipboard _vfp.DataToClip(ALIAS(),RECCOUNT(), 3) LOCAL oXls oXls = CREATEOBJECT("Excel.Application") oXls.Application.DisplayAlerts = .f. loWorkBook = oXls.application.Workbooks.open(< YourTemplate >) *-- select destination cell oXls.ActiveSheet.range("C3").select oXls.ActiveSheet.paste loWorkBook.SaveAs(< NewExcelFile >) oXls.application.quit()HTH