Need a macro to convert pdf file into excel file

[vigneshvicky]

Hi all,
I am searching for a macro to convert the pdf file into excel file. i am having the code but shows some error on it.

Sub convertpdf2()
    Dim AcroXApp As Acrobat.AcroApp
    Dim AcroXAVDoc As Acrobat.AcroAVDoc
    Dim AcroXPDDoc As Acrobat.AcroPDDoc
    Dim Filename As String
    Dim jsObj As Object
    Dim NewFileName As String
    Filename = "C:\Documents and Settings\xxx\Desktop\file01.pdf"
    NewFileName = "U:\file.txt"
    Set AcroXApp = CreateObject("AcroExch.App")
    'AcroXApp.Show
    Set AcroXAVDoc = CreateObject("AcroExch.AVDoc")
    AcroXAVDoc.Open Filename, "Acrobat"
    Set AcroXPDDoc = AcroXAVDoc.GetPDDoc
    Set jsObj = AcroXPDDoc.GetJSObject
    jsObj.SaveAs NewFileName, "com.adobe.acrobat.plain-text"
    AcroXAVDoc.Close False
    AcroXApp.Hide
    AcroXApp.Exit
End Sub

Is there any option to extract the file with certain criteria like name, age etc.... kindly do needful

 

[Andrew Poulsom]

What error do you get? Do you have Adobe Acrobat and have you set a Reference to it?

 

[vigneshvicky]

Hi,
I am facing error in this line Dim AcroXApp As Acrobat.AcroApp and i cant able to create a reference for the adobe file

 

[Andrew Poulsom]

Have you set a reference to Acrobat (Tools|References) in the Visual Basic editor?

 

[vigneshvicky]

Have you set a reference to Acrobat (Tools|References) in the Visual Basic editor?

yeah it had already done but i stil i cant able to create that object

 

[Andrew Poulsom]

What did you set a reference to exactly? I think it needs to be Acrobat.tlb. By the way this is an Excel forum not an Adobe forum.