我做了一个按钮，用代码基于Excel模版生成报表，Excel模版的纸张我设置的是Letter。
然后我使用Book.Save()和Book.SaveToPDF两个语句分别保存该报表的Excel版本和PDF版本。
问题是，Excel版本的报表纸张依然是Letter，但是PDF版本的却变成了A4。
请教我该如何设置让PDF版本也是Letter尺寸。
谢谢！
Dim Book As New XLS.Book(ProjectPath & "Attachments\Invoice-USA.xls")
Dim r As Row = Tables("订单").Current
Dim fl1 As String = "D:\工作文件\订单\" & r("编号") & "\Invoice " & r("编号") & ".xls"
Dim fl2 As String = "D:\工作文件\订单\" & r("编号") & "\Invoice " & r("编号") & ".pdf"
Book.Build()
Book.Save(fl1)
Book.SaveToPDF(fl2)
Dim Proc As New Process
Proc.File = fl2
Proc.Start()
[此贴子已经被作者于2015/7/22 15:08:58编辑过]
加好友 
发短信
Post By：2015/7/22 15:07:00 [只看该作者]
