FileName:=ExtractFilePath(Application.ExeName)+'Files\'+
FormatDateTime('YYYYMMDD',DateTimePicker1.Date)+'至'+
FormatDateTime('YYYYMMDD',DateTimePicker2.Date)+
'历史数据表.XLS';
SaveDBGridEhToExportFile(TDBGridEhExportAsXLS,DBGridEh1,FileName,True);
这样保存的EXCEL内表名会跟文件名一样的,内表名太长了,想把EXCEL内表名变成Sheet1,怎么才能实现?
FormatDateTime('YYYYMMDD',DateTimePicker1.Date)+'至'+
FormatDateTime('YYYYMMDD',DateTimePicker2.Date)+
'历史数据表.XLS';
SaveDBGridEhToExportFile(TDBGridEhExportAsXLS,DBGridEh1,FileName,True);
这样保存的EXCEL内表名会跟文件名一样的,内表名太长了,想把EXCEL内表名变成Sheet1,怎么才能实现?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货