Converting .PDF To .Txt Files Using VBA

[indi visual]

Is it possible to convert PDF files to .Txt files?


Could anyone point me in the right direction on this one?

 

[indi visual]

I've found the following code benath, but it keeps bugging out at line:

'Set jsObj = AcroXPDDoc.GetJSObject

Any ideas on what's causing this?


Sub Convert_PDF_To_Text_File()


Dim AcroXApp As Object

Dim AcroXAVDoc As Object

Dim AcroXPDDoc As Object


Set AcroXApp = CreateObject("AcroExch.App")

AcroXApp.Hide


Set AcroXAVDoc = CreateObject("AcroExch.AVDoc")

AcroXAVDoc.Open strPDFPath, "Acrobat"

AcroXAVDoc.BringToFront


Set AcroXPDDoc = AcroXAVDoc.GetPDDoc


Dim jsObj As Object

Set jsObj = AcroXPDDoc.GetJSObject


jsObj.SaveAs strOutputFile, "com.adobe.acrobat.plain-text"


AcroXAVDoc.Close False

AcroXApp.Exit


End Sub

 

[dan_l]

What are you using to view the PDF file?

 

[indi visual]

Adobe Acrobat Pro 8.0.

 

[indi visual]

I take it this is not possible? : (