Discussion :

[kiki29]

Alternative à Acrobat : Extraction du Texte d'une liste de PDF

La procédure d'extraction des données utiles est à la charge de l'utilisateur et sera à placer à l'endroit idoine. C'est loin d'être une sinécure.

[daniel-12]

Joli travail !

ton code me sera d'une grande utilité

pour info le code a buggé lors de l'extract de plusieurs PDF à cette ligne
ShExtraction.Range("A" & LastRow + 1).PasteSpecial

par contre par petit lot de pdf, ça marche

[kiki29]

Salut, je n'ai pas pu reproduire ce bug, reste à voir avec l'autre alternative

[daniel-12]

Salut
avec un autre PC je n'arrive plus du tout à le faire fonctionner

pour info le message d'erreur est

erreur execution 1004
La méthode PasteSpecial de la classe Range a échoué

bloqué sur ShExtraction.Range("A" & LastRow + 1).PasteSpecial
de la Sub Pdf2Txt



sur office2010 32b / win7 64b

[Marc-L]

Bonjour,

l'erreur classique est d'exécuter un code sur une feuille protégée …

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Nigeria, New-York, Mogadicio, Barcelone, London, Manchester, Stockholm, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[daniel-12]

ou l'autre erreur est de ne pas avoir le fichier pdftotext.exe au même endroit que le classeur !

bref ca marche !

[kiki29]

sChemin = ThisWorkbook.Path & "\" & "pdftotext.exe"

Salut, comme déjà dit, je ne pratique pas l'extispicine ...