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

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

 

 

此主题相关图片如下：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号 打印在第一页的左边第一列就更好了。

 

请高手帮助不吝指教！！