[Risolto] aprire pdf e selezionare tutto

[XLUPOGRIGIOX]

ciao a tutti,ho una domanda un po particolare.
è possibile tramite macro aprire un file pdf e selezionarne il contenuto per poi incollarlo in un foglio di calc?
aprire il pdf tramite macro non è un problema,una volta aperto,manualmente sul pdf clicco modifica,seleziona tutto e copia,è possibile farlo in automatico tramite macro?
grazie sin d'ora per le risposte

[XLUPOGRIGIOX]

ragazzi nessuna idea?

[patel]

una volta aperto il controllo passa a adobe o chi per lui e non puoi più fare niente

[XLUPOGRIGIOX]

ahhh capito,peccato,quindi vale lo stesso discorso se volessi fare da pdf aperto ->file-> salva come testo o c'è una macro per farlo?

[unlucky83]

ciao, devi esportare tutto il pdf in calc? Potrebbe esserci una soluzione un pò macchinosa che illustro a grandi linee
-su linux uso un programma da linea di comando chiamato pdftotext per esportare in txt i pdf e lo stesso programma dovrebbe essere incluso nel programma multipiattaforma Xpdf (leggi qui). Potresti avviarlo via macro e generare così il file txt
- La macro una volta verificata l'esistenza del file txt, lo legge rigo per rigo e salva i valori nelle giuste celle del foglio.

[XLUPOGRIGIOX]

ho dato un'occhiata veloce,sembra interessante,domani provo ad usarlo e faccio sapere,per ora grazie

[XLUPOGRIGIOX]

Ciao unlucky,ho scaricato il pacchetto pdftotext,ma non ho ancora ben capito come usarlo con openoffice per aprire i pdf ed esportarli in txt...puoi darmi una mano facendo qualche esempio di macro?

[XLUPOGRIGIOX]

Scusa Unlucky,girando su google ho trovato questa macro su un sito francese e funziona proprio bene,la posto per chiunque ne abbia bisogno

Codice: Seleziona tutto

Sub PDFenTXT()
   Dim sExe As String, sParam as string
   Dim sPDF as string, sTxt as string
   
   sExe = ConvertToURL("C:\Users\Antonio\Documents\xpdfbin-win-3.04\bin32\pdftotext.exe")'percorso dove si trova pdttotxt
   sParam = " "
   sPDF = "C:\Users\Antonio\Documents\autocertificazione.pdf" 'percorso dove si trova il pdf da trasformare in txt
   sTxt = "C:\Users\Antonio\Documents\autocertificazione.txt" 'percorso dove salvare il txt estratto da pdf

   Shell (sExe & sParam & sPDF & " " & sTxt) 'esportazione da pdf in txt
End Sub

nel post originale,sParam era

Codice: Seleziona tutto

 sParam = " -f4 -l4 "

credo che si riferisse a quale pagina si dovesse importare in txt, -f <int> prima pagina da convertire, -l <int> ultima pagina da convertire.
Io l'ho lasciata libera in modo che mi prenda tutto il documento.
La pagina del forum francese è questa https://forum.openoffice.org/fr/forum/v ... c70e23eedc
Grazie per il suggerimento,è stato molto valido

[unlucky83]

Ottimo