以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何让保存的PDF文件,刚好在1页的A4的页面内  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89926)

--  作者:发哥
--  发布时间:2016/9/1 15:05:00
--  如何让保存的PDF文件,刚好在1页的A4的页面内
请问狐爸,如何让保存的PDF文件,刚好在A4的页面内呢 利用教程中的代码: Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls") Dim fl As String = ProjectPath & "Reports\\出库单.pdf" Book.Build() \'生成细节区 Book.SaveToPDF(fl) \'保存为PDF文件 Dim Proc As New Process \'打开PDF文件 Proc.File = fl Proc.Start() 保存为 EXCEL 和PDF ,一切OK。就是保存的PDF,(要求一页之内),可总是出了位(为二页) 请问狐爸:能不能写个代码,让它保存为一页的PDF呢,谢谢。
[此贴子已经被作者于2016/9/1 15:11:47编辑过]

--  作者:有点蓝
--  发布时间:2016/9/1 15:14:00
--  
只能调整模板,不能超过一页
--  作者:发哥
--  发布时间:2016/9/1 15:28:00
--  
调了很多次了,那E表模板。 总是欠缺。
--  作者:有点蓝
--  发布时间:2016/9/1 15:36:00
--  
那就还是没有调好。在Excel直接预览是否会生成2页?

模板发上来看看

--  作者:发哥
--  发布时间:2016/9/1 15:45:00
--  
E表的打印设置,是调好的了,也调整了打印绽放比例,可这次就是不行 了(以前没有过的,包抱WORD转PDF) 我在想想看看,谢谢你们