主题：求助，我想在窗口上建一个生成excel报表的按钮，要怎么写代码？

求助，我想在窗口（不是菜单）上建一个生成excel报表的按钮，要怎么写代码？在我选定哪一行就能导出哪一行的报表

太宽了，如果就一行，太浪费纸了。

大师们说了，上传个例子，帮你决绝下

xls.reports(   ).build

我是一个数据库里有多个表，每个表的数据内容不一样，而且每个表中我是一行记录一个工程数据，然后每个工程都有不同的竣工资料，竣工资料的数据来源于对应的行，所以我不能在使用菜单里的excel报表导出功能，而是在每个表对应的录入窗口上增加对应的excel报表导出按钮，使用按钮设计中默认的代码不行

Dim Book As New XLS.Book(ProjectPath & "Attachments\开工报告.xls")
Book.Build()
Book.Save(ProjectPath & "Reports\开工报告.xls")
Dim Proc As New Process
Proc.File = ProjectPath & "Reports\铁塔开工报告.xls"
Proc.Start()

 

你说的不行，是什么意思？请做一个小例子上传上来说明。

Dim Book As New XLS.Book(ProjectPath & "Attachments\开工报告.xls")
Book.Build() 
Book.Save(ProjectPath & "Reports\开工报告.xls")
Dim Proc As New Process
Proc.File = ProjectPath & "Reports\铁塔开工报告.xls"
Proc.Start()