select master1 Copy to C:\gin_exp.xls type xls FIELDS LIKE C*,D* EXCEPT CREDIT,DR_CR loExcel = createobject("Excel.Application") loWorkbook = loExcel.workbooks.open('C:\gin_exp.xls') loSheet = loWorkbook.sheets(1) && or pass the name of your sheet as a string! loExcel.Visible = .T. && display Excel thisform.refreshIt works fine and there is no problem.