Thema Datum  Von Nutzer Rating
Antwort
Rot PDF-Formular in Excel extrahieren
07.12.2023 14:32:45 Taner
Solved
08.12.2023 17:32:54 Gast63490
NotSolved
08.12.2023 17:40:54 Gast24912
NotSolved
11.12.2023 09:28:23 taner
NotSolved
11.12.2023 12:56:22 Gast73826
NotSolved
11.12.2023 11:34:22 stephenhood
NotSolved

Ansicht des Beitrags:
Von:
Taner
Datum:
07.12.2023 14:32:45
Views:
567
Rating: Antwort:
 Nein
Thema:
PDF-Formular in Excel extrahieren

Hallo zusammen, 

ich komme leider nicht weiter, daher bitte Euch um Hilfe.

Ich möchte einen Automatismus erstellen, damit die Formulareinträge von mehreren PDF's (nach Auswahl) in Excel übernommen werden können. Ich habe den Code so erfasst, aber ich kriege nicht die Textfelder vom Formular, die von den Personen ausgefüllt werden, sondern nur was außerhalb drum geschrieben ist zu sehen. Als nächsten Schritt wollte ich die Textfelder in Excel ab Zelle D8 übernehmen, aber es funktioniert nicht. 

Sub PdfToExcel()

Dim word_app As Word.Application
Dim word_doc As Word.Document

Dim clean_text, table_text, summary_text, all_text, file_name As String
Dim txt_line_1, text_line_2, stadt_name, person_name, , person_vorname, anschrift_code As String

Dim words_arrayss_1() As String, words_array_2() As String

Set word_app = New Word.Application
word_app.Visible = False
word_app.DisplayAlerts = False

Dim objRe As New RegExp
objRe.MultiLine = True
objRe.Global = True

file_name = "*.pdf"

Set word_doc = word_app.Documents.Open(file_name, False)

all_text = word_doc.content


objRe.Pattern = "(^.*Anzeige)(.*)(Unterschrift.*)"
table_text = objRe.Replace(all_text, "$2")
summary_text = objRe.Replace(all_text, "$1")
Debug.Print summary_text

word_doc.Close True
word_app.Quit

End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot PDF-Formular in Excel extrahieren
07.12.2023 14:32:45 Taner
Solved
08.12.2023 17:32:54 Gast63490
NotSolved
08.12.2023 17:40:54 Gast24912
NotSolved
11.12.2023 09:28:23 taner
NotSolved
11.12.2023 12:56:22 Gast73826
NotSolved
11.12.2023 11:34:22 stephenhood
NotSolved