Convertir PDF en TXT sous Acrobat Reader

Bonjour,

Je rencontre un problème pour convertir un fichier PDF en fichier Texte sous Acrobat Reader.

Voici le code que j'utilise :

Sub Ouvrir_Et_Copier_PDF()

    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 = "\\Dassault-avion.fr\racine$\DA\SOC\NP\DE\BZ\ICM\PAM\ECHANGES-ST\ECM\28- Transfert T3 Inde\FIs T3 - Origine\STADE 4\T12 EQUIPPE (for T15)_PV0001.pdf"
    NewFileName = "\\Dassault-avion.fr\racine$\DA\SOC\NP\DE\BZ\ICM\PAM\ECHANGES-ST\ECM\28- Transfert T3 Inde\FIs T3 - Origine\STADE 4\T12 EQUIPPE (for T15)_PV0001.txt"

    Set AcroXApp = CreateObject("AcroExch.App")

    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

Lorsque j'exécute ce code j'obtiens une erreur "Active X".

Savez-vous d'où viens cette erreur ? Si vous avez une autre solution pour convertir ou enregistrer un pdf au format .txt je suis preneur car je bloque.

Merci d'avance pour votre aide.

GuiGui8731

Bonjour GuiGui8731

Beaucoup ce font avoir avec ce type de codes qui date de Mathusalem et ne fonctionnait que si on avait Adobe Acrobat

Donc il ne sera pas fonctionnel pour toi

@+

Bonjour BrunoM45,

Merci pour ton retour.

Existe-t-il par hasard une alternative à mon code pour convertir ou enregistrer un pdf en txt par acrobat reader ?

Cordialement

GuiGui8731

Re,

A part sélectionner et copier le contenu du PDF et le coller soit même dans une feuille, non il n'y a pas d'autre solution avec Adobe Reader

@+

Merci pour ta réponse BrunoM45,

Fonctionnerait-il sur une autre version de Adobe par hasard ?

Sinon ça sera une conversion manuelle en .txt.

Cordialement

GuiGui8731

Re,

Peut être avec Adobe Acrobat DC mais à voir, je testerai car j'ai la version

Bonne soirée

@+