主题：如何设置特殊格式的模版文件

按照上面的要求打印职工时，每页纸分三列，无法生成所要的效果，就把模版改了一下

 

 

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

 

代码如下：

Dim Book As New XLS.Book(ProjectPath & "Attachments\年度考核名册导出模版.xls")   '打开模板
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet.Locked = True '禁止编辑
Sheet(1,3).Value = myDWMC '修改模板,加入制单人信息
Sheet(1,6).Value = CurrentY & "年" '修改模板,加入制单人信息
Sheet(1,8).Value = CurrentM & "月" '修改模板,加入制单人信息
Dim fl As String = ProjectPath & "电子表格\" & "年度考核结果审核名册.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
'Forms("考核工资汇总表窗体").Close
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

 

生成了下列的表:

 

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

 

有三个问题：

1、第二页打印的时候没有表头，虽然在模板里设置了顶端标题行。--（问题已经解决）

2、每页显示数据22行，在第二页没有22行时，没有用空行来补足。

3、能通过设计，把职工的1-22号 打印在第一页的左边第一列就更好了。

 

请高手帮助不吝指教！！

1 加上<HeaderRow>  才能重复打印表头

原来的问题：

 1、 已经解决，谢谢

 2、把<教职工信息表,@3,22>改成<教职工信息表,@3,-22>后，在表格最后还是没有添加空行,如果把3列改为1列就没有这个问题了。

 3、职工顺序按这个顺序排列

      1        2        3

      4        5        6

      7        8        9

      .... 

想改为下列方式

      1         23        45

      2         24        46

      3         25        47

      ...        ...         ...

      22       44         66

第1页比较容易生成 ，问题是第一页最后一号是66，到了第二页应该是67，但实际生成的第二页的号码从23开始

用专业报表，分栏打印。

Excel模板，也是用专业报表做的。

 

如果掌握了专业报表，其他形式，你都不一定想的到去用了。

都解决了 ，谢谢诸位！

楼主，你好，这个功能可能很多狐友也有需求，能不能分享一下。