Anzeige
Archiv - Navigation
1752to1756
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

pdftoText in WSHshell

pdftoText in WSHshell
30.04.2020 18:52:41
Dirk
Hallo zusammen,
ich habe in ein Problem beim Aufruf pdftotext mit einem zusätzlichen Parameter für die zu erzeugende Textdatei. "pdftotext" erzeugt die txt-Datei imme rim gleichen Verzeichnis wie die pdf-Datei. Dies möchte ich nicht.
Hier ein Auszug aus meinerm VBA-Code, der auch klappt (mit obigen Problem):
Set WSHShell = CreateObject("WScript.Shell")
test = """" & ThisWorkbook.Path & "\test.txt""
strCMDLine = """" & ThisWorkbook.Path & "\pdftotext.exe"" -raw -layout -nopgbrk "
WSHShell.Run strCMDLine & """" & strDateiname & """", 0, True
Ändere ich den Aufruf wie folgt ab, passiert nichts mehr
WSHShell.Run strCMDLine & """" & strDateiname & """" & """" & test &"""", 0, True
Kann mir hier jemand den entscheidenden Tipp geben.
Danke schon mal im voraus
Dirk

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: pdftoText in WSHshell
01.05.2020 10:01:46
Dirk
Hallo Luschi,
habe es so umgesetzt (denke ich jedenfalls) wie in der Anleitung beschrieben, aber leider kommt der Fehler: "Laufzeitfehler 53: Datei nicht gefunden."
Hier die Umsetzung(Ergebnissse dereinezlen Steps habe ichals Kommentar hinzugefügt:
sExecuteFile = "" & ThisWorkbook.Path & "\pdftotext.exe"""
'"F:\081 xxx\pdftotext.exe""
sSourcePDF = """" & strDateiname & """"
'""F:\CLEAN VERSION\Pj05 HF 2019-10-20.pdf""
sTargetTXT = """" & ThisWorkbook.Path & "\test.txt"
'""F:\081 xxx\test.txt"
sCommand = sExecuteFile & " -raw -layout -nopgbrk " & sSourcePDF & " " & sTargetTXT
'"F:\081 xxx\pdftotext.exe" -raw -layout -nopgbrk "F:\CLEAN VERSION\Pj05 HF 2019-10-20.pdf" "F:\081 xxx\test.txt"
vResult = Shell(sCommand, vbHide)
Führe dich den Befehl aus sCommand direkt auf der Kommandozeile aus funktioniert es und erstellt mir die Ausgabedatei unter dem angegeben Nachm in das angegeben Verzeichnis.
Für mich deutet der Fehler darauf hin, dass er auch die Datei "test.txt" umwandeln will, die es natürlich nicht gibt - es ist das die Ausgabedatei für pdftotext.
Lasse ich die Ausgabedatei weg funktioniert das ganze (denn erzeugt er aber eine Ausgabedatei im Verzeichnis des Eingabedatei als txt-DAtei mit den Namen der Eingabedatei - dies kannich aber so nicht gebrauchen.
Ich hoffe, es findet einer den Fehler und kann mir helfen
Danke schon mal und Gruß
Dirk
Danke und GR
Anzeige
pdftoText in WSHshell
01.05.2020 12:31:59
Anton
Hallo Dirk,
ersetze:

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

durch:

sExecuteFile = ThisWorkbook.Path & "\pdftotext.exe"
mfg Anton
AW: pdftoText in WSHshell
01.05.2020 16:10:39
Dirk
Hallo Anton,
das war es - vielen Dank (auch Luschi)
Gruß
Dirk

262 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige