ExcelApp := CreateOleObject('Excel.Application');
ExcelWorkBook := ExcelApp.WorkBooks.Open(sFilePath);
这样生成后,然后用ExcelWorkBook1.SaveAs保存,但是因为我是office2007,默认的格式是xlxs,怎么样才能导出xls啊,我用ExcelWorkBook1.SaveAs(ExtractFilePath(Application.ExeName)+ExcelWorkBook.Sheets[i].name+'.xls')和ExcelWorkBook1.SaveAs(ExtractFilePath(Application.ExeName)+ExcelWorkBook.Sheets[i].name+'.xls',56)都不行。
ExcelWorkBook := ExcelApp.WorkBooks.Open(sFilePath);
这样生成后,然后用ExcelWorkBook1.SaveAs保存,但是因为我是office2007,默认的格式是xlxs,怎么样才能导出xls啊,我用ExcelWorkBook1.SaveAs(ExtractFilePath(Application.ExeName)+ExcelWorkBook.Sheets[i].name+'.xls')和ExcelWorkBook1.SaveAs(ExtractFilePath(Application.ExeName)+ExcelWorkBook.Sheets[i].name+'.xls',56)都不行。
点左上角的OFFICE徽标,在弹出的窗口的右下角选择“选项”“保存”在右边“保存文档”里“将文件保存为此格式:”后选择xls格式。