Ошибка 450 при использовании AcroExch.AVdoc.Откройте, чтобы открыть pdf-файл с помощью vba

Question

Я пишу макрос для поиска конкретных текстов (более десяти слов) в некоторых документах 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), он возвращает Error 450 Неправильное число аргументов или присвоение недействительного имущества

Я искал в Интернете, Acrobat форум, Stackoverflow, вы называете это .. . и не смогли найти ответ ...

Неужели кто-нибудь еще сталкивается с этой проблемой раньше?

Мне любопытно, почему это происходит и как его решить.

Заранее спасибо.

Answer 1

Вы можете попробовать под кодом и посмотреть, сможете ли вы устранить эту ошибку.

PDFDoc.Open PDFPath ""