主题：[求助]请问狐表可以 自动排版，打印 EXCEL报表么？

想要实现的 功能，和打印EXCEL报表一样，设置模板后，生成打印的excel文本打印。

但是，想要系统能自动把要打印报表的数据，按某一个字段排序，然后再打印。

请问要实现这个功能，应该从哪方面着手？

EXCEL报表模板本身，能实现数据排序么？（ 因为我的模板是职工资料卡那样的形式，不是一个表格，不能在生成 EXCEL报表后，再用EXCEL的排序功能）

求指教，谢谢 ！

因为数量特别大，要按150多个部门排序，每个部门都有70多人，这样的资料卡，我做的模板一页纸只能打印9个人。

想要在排序后，自动设置分页符，使得一个部门结束后，刚好分页，而且这样打印出来的EXCEL，不会刚好在某人的资料卡的一半时分页，应该怎么做呢？

在您给的帮助页，我还有点不懂。

求教~~

呃，又发现问题了……

我用您的方法 做了，生成的报表也确实是分部门打印了，但是有一个37人的部门，却打到另外一个部门的那一页上去了。

我核对了，它的确是分了部门，然而却没有单独分页。

请问如何处置呢？

我是按照每排3个人，每页打3排来打的

十分感谢！

现在显示的是总页码，但如果我想要双面打印的话，总页码就看不出来这个部门已经打完了。

那么如果换成这样解决 

这个代码应该怎么来写呢?您让我看的里面有：

Dim Book As New XLS.Book(ProjectPath & "Attachments\订单.xls") '打开模板
Dim fl As String = ProjectPath & "Reports\订单.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(3,9).Value = "<日期 = # " & Date.Today & "#>"  '写入打印条件
Book.Build() '生成报表
Book.Save(fl) 
Dim Proc As New Process 
Proc.File = fl
Proc.Start()