使用AcroExch.AVdoc.Open使用vba打开pdf文件时出现错误450

时间:2016-08-23 08:12:30

标签: excel excel-vba pdf acrobat vba

我正在编写一个宏来搜索某些pdf文档中的特定文本(超过十个单词),使用Excel 2013和Adobe Acrobat XI,参考:Adobe Acrobat 10.0类型库。

我发现此代码在线开始

Sub findtext()
  'Initialize Acrobat by creating App object
  Set PDFApp = CreateObject("AcroExch.App")

  'Set AVDoc object
  Set PDFDoc = CreateObject("AcroExch.AVDoc")

  'PDF path
  PDFPath = "C:\Users\abc\Desktop\text.pdf"

  'Open the PDF
  PDFDoc.Open(PDFPath)

  ......

END Sub 

逐行运行代码。前三行工作正常。

当在 PDFDoc.Open(PDFPath)行时,它返回 错误450 错误的参数数量或无效的属性赋值< / em>的

我在线搜索,Acrobat论坛,Stackoverflow,你给它命名......但找不到答案......

之前是否有其他人遇到此问题?

我很好奇它为什么会发生以及如何解决它。

提前致谢。

1 个答案:

答案 0 :(得分:0)

您可以尝试以下代码,看看是否可以解决错误。

PDFDoc.Open PDFPath,&#34;&#34;