Eines der häufigsten Probleme, mit denen die meisten von uns im täglichen Leben konfrontiert sind, ist die Frage, wie man bestimmte Daten aus einer PDF Datei in ein Excel-Arbeitsblatt mit VBA In diesem Artikel zeige ich Ihnen, wie Sie dies bequem mit entsprechenden Beispielen und Illustrationen bewerkstelligen können.

Extrahieren bestimmter Daten aus PDF in Excel mit VBA (Schnellansicht)

 Sub Extract_Data_from_PDF() Set MyWorksheet = ActiveWorkbook.Worksheets("Sheet1") Application_Path = "C:\Program Files\Adobe\Acrobat DC\Acrobat\Acrobat.exe" PDF_Path = "E:\ExcelWIKI\standardnormaltable.pdf" Shell_Path = Application_Path & " """ & PDF_Path & """" Call Shell(pathname:=Shell_Path, windowstyle:=vbNormalFocus) Application.Wait Now + TimeValue("0:00:03") SendKeys "%vpc"SendKeys "^a" SendKeys "^c" MyWorksheet.Range("A1").PasteSpecial Paste:=xlPasteAll Call Shell("TaskKill /F /IM Acrobat.exe", vbHide) End Sub 

Download Arbeitsbuch Praxis

Laden Sie dieses Übungsheft herunter, um zu üben, während Sie diesen Artikel lesen.

Ein Überblick über das Extrahieren bestimmter Daten aus PDF in Excel mit VBA (Schritt-für-Schritt-Analyse)

Kommen wir also ohne weitere Verzögerung zu unserer heutigen Hauptdiskussion. Hier haben wir eine PDF Datei namens standardnormaltabelle.pdf die eine Tabelle mit der Normalverteilung enthält.

Und wir haben ein Arbeitsblatt namens Blatt1 in eine Excel-Arbeitsmappe, in die wir die Daten aus der PDF Datei.

Jetzt zeige ich Ihnen, wie Sie Daten aus dem PDF Datei in das Excel-Arbeitsblatt durch eine schrittweise Analyse.

⧪ Schritt 1: Deklaration der erforderlichen Eingaben

Zunächst müssen Sie die notwendigen Eingaben angeben, wie den Namen des Arbeitsblatts, den Bereich der Zellen, den Ort der Anwendung, über die die PDF Datei geöffnet werden ( Adobe Reader in diesem Beispiel), und die Position der PDF Datei.

 Set MyWorksheet = ActiveWorkbook.Worksheets("Sheet1") Application_Path = "C:\Program Files\Adobe\Acrobat DC\Acrobat\Acrobat.exe" PDF_Path = "E:\ExcelWIKI\standardnormaltable" 

⧪ Schritt 2: Öffnen der PDF-Datei (mit dem VBA-Shell-Befehl)

Als nächstes müssen wir die VBA Shell-Funktion zum Öffnen des PDF Datei.

 Shell_Path = Application_Path & " """ & PDF_Path & """" Call Shell(pathname:=Shell_Path, windowstyle:=vbNormalFocus) 

⧪ Schritt 3 (optional): Einige Augenblicke warten

Dies ist optional, aber wenn Sie eine lange Reihe von Aufgaben haben, ist es besser, ein paar Augenblicke zu warten, damit Ihr Computer die frühere Aufgabe erfolgreich abschließen und eine neue Aufgabe beginnen kann.

 Application.Wait Now + TimeValue("0:00:03") 

Hier warten wir 30 Sekunden, aber wenn Sie wollen, können Sie auch länger warten.

⧪ Schritt 4: Verwenden von SendKeys zum Kopieren von Daten aus der PDF-Datei

Dies ist wahrscheinlich die wichtigste Aufgabe. Wir verwenden 3 SendeSchlüssel:

• ALT + V, P, C: Dies dient hauptsächlich dazu, das Scrollen in der PDF Bei kleinen Dateien ist dies nicht notwendig, aber bei größeren Dateien wird dies notwendig, um die gesamte Datei auszuwählen.
• CTRL + A: Damit wird die gesamte Datei ausgewählt.
• STRG + C : Zum Kopieren der ausgewählten Datei.

Daher werden die Codezeilen sein:

 SendeSchlüssel "%vpc" SendeSchlüssel "^a" SendeSchlüssel "^c" 

⧪ Schritt 5: Einfügen der Daten in die Excel-Datei

Wir haben die spezifischen PDF Nun müssen wir diese Daten in den gewünschten Bereich des Arbeitsblatts einfügen.

 MyWorksheet.Range("A1").PasteSpecial Paste:=xlPasteAll 

Hier habe ich eine Zelle eingefügt A1 Sie können es natürlich auch an einer anderen Stelle einfügen, wenn Sie es wünschen.

⧪ Schritt 6 (optional): Schließen der PDF-Datei (Beenden der Anwendung)

Schließlich ist es besser, das laufende Programm zu schließen, wenn Sie mit der Datenextraktion fertig sind.

 Shell("TaskKill /F /IM Acrobat.exe", vbHide) aufrufen 

Lesen Sie mehr: Daten aus PDF in Excel extrahieren (4 geeignete Methoden)

Ähnliche Lektüre

• Exportieren von Daten aus ausfüllbaren PDF-Dateien nach Excel (mit schnellen Schritten)
• PDF-Kommentare in eine Excel-Tabelle exportieren (3 schnelle Tricks)

Beispiel für das Extrahieren bestimmter Daten aus PDF in Excel mit VBA

Wir haben das schrittweise Verfahren zur Extraktion von Daten aus einer PDF Datei in ein Excel-Arbeitsblatt mit VBA .

Daher ist die vollständige VBA Code zum Extrahieren von Daten aus dem PDF Datei namens Standardnormaltabelle zu Blatt1 sein wird:

⧭ VBA-Code:

 Sub Extract_Data_from_PDF() Set MyWorksheet = ActiveWorkbook.Worksheets("Sheet1") Application_Path = "C:\Program Files\Adobe\Acrobat DC\Acrobat\Acrobat.exe" PDF_Path = "E:\ExcelWIKI\standardnormaltable.pdf" Shell_Path = Application_Path & " """ & PDF_Path & """" Call Shell(pathname:=Shell_Path, windowstyle:=vbNormalFocus) Application.Wait Now + TimeValue("0:00:03") SendKeys "%vpc"SendKeys "^a" SendKeys "^c" MyWorksheet.Range("A1").PasteSpecial Paste:=xlPasteAll Call Shell("TaskKill /F /IM Acrobat.exe", vbHide) End Sub 

⧭ Ausgabe:

Führen Sie diesen Code aus, und er kopiert die Daten aus der Datei PDF Datei namens "Standardnormaltabelle" auf das Arbeitsblatt namens "Blatt1" in der aktiven Arbeitsmappe.

Lesen Sie mehr: Wie man Daten aus mehreren PDF-Dateien in Excel extrahiert (3 geeignete Methoden)

Dinge zum Merken

• Die Arbeitsmappe, in die Sie die Daten aus der PDF Datei muss während der Ausführung des Codes geöffnet bleiben, sonst müssen Sie den Namen der Arbeitsmappe im Code verwenden.
• Der Name der Anwendung, die Sie innerhalb des Codes verwenden ( Adobe Acrobat DC hier) muss auf Ihrem Computer installiert sein, sonst erhalten Sie eine Fehlermeldung.
• Für große Datensätze von PDF Dateien kann es einige Zeit dauern, bis alle Daten kopiert und eingefügt sind. Haben Sie also Geduld und warten Sie, bis der Vorgang erfolgreich abgeschlossen ist.

Schlussfolgerung

Es handelt sich also um ein Verfahren zur Extraktion bestimmter Daten aus einem PDF Datei in ein Excel-Arbeitsblatt mit VBA Wenn Sie Fragen haben, können Sie uns diese gerne stellen. Und vergessen Sie nicht, unsere Website zu besuchen ExcelWIKI für weitere Beiträge und Aktualisierungen.