以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于EXCEL加入打印背景图片  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127932)
--  作者：工匠
--  发布时间：2018/11/25 15:33:00
--  [求助]关于EXCEL加入打印背景图片
老师好：请教个问题，就是在EXCEL报表模板里，通过页眉加入了1张图片，作为底层打印（铺满页面的）。如果直接预览可以显示打印该图片，但是通过系统报表打印（有数据对应），那张加入的图片没有带出来了，请问要如何从报表打印也能带出来在文字底层。谢谢！
--  作者：有点甜
--  发布时间：2018/11/25 16:36:00
--  

你在你的excel模板设置好页眉，插入图片。然后执行代码

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\\监造周报.xls")
Dim fl As String = ProjectPath & "Reports\\监造周报.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0) \'引用工作簿的第一个工作表
With Sheet.PrintSetting
    \'页眉左边为日期,中间为时间,右边为表名
    .Header = "&L&D &C&T&G &R&F"
    \'\'在页脚右边打印页号和总页数
    .Footer = "&R第&P页,总&N页"
End With
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿

 

 

http://www.foxtable.com/webhelp/scr/1315.htm
--  作者：工匠
--  发布时间：2018/11/26 13:04:00
--  
谢谢有点甜老师，周末还在值班，万分感谢！