以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  页脚问题 页脚重复 2个页脚  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88704)

--  作者:mayazql
--  发布时间:2016/8/8 9:48:00
--  页脚问题 页脚重复 2个页脚
我在模板设置了页脚,但打印时最后一页出现了2个页脚(页脚重复)不知道什么原因。
具体如下图:

图片点击可在新窗口打开查看此主题相关图片如下:foot2.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:foot1.png
图片点击可在新窗口打开查看


--  作者:mayazql
--  发布时间:2016/8/8 10:05:00
--  
不知道什么原因
--  作者:大红袍
--  发布时间:2016/8/8 10:13:00
--  
 做个例子上来看看。
--  作者:mayazql
--  发布时间:2016/8/8 11:29:00
--  
链接:http://pan.baidu.com/s/1geZiapt 
密码:1b45

谢谢大红袍
[此贴子已经被作者于2016/8/8 11:29:56编辑过]

--  作者:大红袍
--  发布时间:2016/8/8 11:30:00
--  

 

[此贴子已经被作者于2016/8/8 11:34:51编辑过]

--  作者:大红袍
--  发布时间:2016/8/8 11:35:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:prprint.xls


--  作者:mayazql
--  发布时间:2016/8/8 11:52:00
--  
大红袍,你好,我是希望多页打印时,每页都有这个页脚,不是只有最后一页有页脚。谢谢
有一个申请单号是PR160803005
可以测试多页打印。

谢谢
[此贴子已经被作者于2016/8/8 11:53:29编辑过]

--  作者:大红袍
--  发布时间:2016/8/8 12:07:00
--  

模板做不到,你要代码加上页眉页脚

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\\PRPRINT.xls")
Dim fl As String = ProjectPath & "Reports\\PRPRINT.xls"
Book.Build() \'生成细节区
Dim sheet = book.sheets(0)
With Sheet.PrintSetting
    \'页眉左边为日期,中间为时间,右边为表名
    .Header = "&L&D &C&T &R&A"
    \'在页脚右边打印页号和总页数
    .Footer = "项目经理:  部门经理:   申请人:    "
End With
Book.Save(fl) \'保存工作簿

Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

 

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