【结贴】如何将表单导出到EXCEL**

ZHOUX

我现在可以将表单导出到EXCEL，但是我想现在有个问题，就是如何将多个表单导出到一个EXCEL文档的不同Sheet中。不知道有没有什么办法么？？？
procedure TDBSBBD.Button1Click(Sender: TObject);
var
lname: string;
begin
  if SaveDialog1.Execute then
  begin
  lname:= SaveDialog1.FileName+'.xls';
  SHEETDOCLIB.TSHEETDOCLIB.CopySheetToExcel(DocView,lname);
  end;
end;
用这段代码实现了导出，但是如果我想实现多个表格导出到一个EXCEL的不同Sheet应该怎么办？？？

lixy

没有提供现成的东西。楼主自己可以用第三方的方法去整合到一起。

ZHOUX

我晕。。。。能给提供一个解决方法么？？？第三方方法啊？？给提供个东东也行啊。。。。

jiahaiming

如：调用vba，拷贝sheet。
楼主可以参考一下Office的相关帮助。

lixy

这个我没搞过，第三方的方法就是你用别的编程工具写的函数，用平台来调用。

ZHOUX

OK。多谢啊。呵呵。结贴吧。