[求助]excel单据摸版生成报表，怎么把所有单据按一页页的都生成在一个表格报表上？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

使用下面的代码每次都只是生成的都是最后一个单据，其它前面的单据也显示不出来啊

For Each r As Row In Tables("单据主表").Rows

Dim Book As New XLS.Book(ProjectPath & "Attachments\moban\000001.xls")

Dim fl As String = ProjectPath & "Reports\单据.xls"

Book.Build() '生成细节区

Book.Sheets(0).Rows.RemoveAt(0) '删除第一行,Excel报表的第一行通常是标记行

Book.Save(fl) '保存工作簿

Dim Proc As New Process '打开工作簿

Proc.File = fl

Proc.Start()

此主题相关图片如下：1020202.jpg

可以这种一页页的展示出啦，生成一个excel含所有送货单据的报表呢？

下载信息 [文件大小：下载次数： ]
点击浏览该文件:000001.xls

请问老师，是表格摸版设置问题，还是要代码设置，求指教？

主题：[求助]excel单据摸版生成报表，怎么把所有单据按一页页的都生成在一个表格报表上？