VBA + Adob​​e Acrobat SDK - 无法保存空白页面？

Question

我使用 VBA 作为平台来进行一些 PDF 操作。我遇到的问题是，如果 PDF 对象尚未打开，我似乎无法保存 PDF 对象。下面是向 PDF 对象插入页面，然后保存 pdf 对象的代码的 sn-p。就代码而言，我已经确定它可以工作，因为我已经用另一个 pdf 对象使用相同的输入测试了 save 方法，它工作得很好。有人可以帮助解释为什么它不允许我保存对象吗？

谢谢！

Dim NewPDF As New Acrobat.AcroPDDoc
Set NewPDF = CreateObject("AcroExch.PDDoc")
If NewPDF.InsertPages(j, OriPDF, j, 1, 0) Then MsgBox "Success"
If NewPDF.Save(PDSaveLinearized, WritePath & "\" & sh.Cells(StartRow + j - 1, i).Value & ".pdf") Then MsgBox "Success"
NewPDF.Close
Set NewPDF = Nothing

运行上述代码时，两条成功线均未按预期工作。

Answer 1

将第 3 行更改为此...

If NewPDF.InsertPages(-1, OriPDF, j, 1, 0) Then MsgBox "Success" 

第一个参数是插入新页面的位置，但您没有页面，因为文档是空的，因此没有页面零。