主题：报表模板生成报表时的表头问题

需要用vba处理，参考

http://www.foxtable.com/webhelp/scr/2121.htm

改成

.PrintTitleRows = Ws.Rows("1:3").Address '打印行标题(在每一页的顶部重复出现)

1、

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=54396&replyID=360697&skin=1

2、如果1无法修复，就重新安装一下wps。

如果1无法修复，就重新安装一下wps。

实例发上来测试。

参考

Dim Book As New XLS.Book(ProjectPath & "Attachments\表A.xlsx")
Dim fl As String = ProjectPath & "Reports\表A.xlsx"
Book.Build()
Book.Save(fl)

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(ProjectPath &"Reports\表A.xlsx")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
With Ws.PageSetup
    '设置打印区域
    .PrintTitleRows = Ws.Rows("1:3").Address '打印行标题(在每一页的顶部重复出现)

End With
App.Visible = True
Ws.PrintPreview
App.Quit

1、我测试没问题；

2、26楼的错误，请卸载重新安装ms office，看6楼的教程去做。