[gelöst] shell PDF-Reader mit Dokument aufrufen

[sven-my]

Hallo Experten,

keine Ahnung, wonach (Stichwörter) ich bei diesem Problem suchen soll !

Mein Basic-Code:

Code: Alles auswählen

	shell("D:\PDF-XChangeViewer\PDF Viewer\PDFXCview.exe",1)

funktioniert wie er soll.

Als fauler Mensch möchte ich das gerade gespeichertes PDF-Dokument gerne über das gleiche Makro aufrufen.

Code: Alles auswählen

	shell("D:\PDF-XChangeViewer\PDF Viewer\PDFXCview.exe" & " /Lw:\Ordner\Dokumentname.pdf",1)

klappt genauso wenig, wie:

Code: Alles auswählen

	shell("D:\PDF-XChangeViewer\PDF Viewer\PDFXCview.exe" & " \Lw:\Ordner\Dokumentname.pdf",1)

(Unterschied ist der slash/backslash vor Lw:\)

Der Reader wird zwar gestartet, aber leer.

Auch dies klappt nicht:

Code: Alles auswählen

shell("Lw:\Ordner\Dokumentname.pdf",1)

Fehlermeldung: Basic-Laufzeitfehler / Datei nicht gefunden

Funktioniert es überhaupt, was ich möchte; wenn ja, wo ist mein Fehler ?

gruß
sven-my

[theindless]

Hallo,

nach kurzem nachlesen in der Hilfe habe ich folgendes gefunden:

Syntax
Shell (Pathname As String[, Windowstyle As Integer][, Param As String][, bSync])

=> zuerst muss der Windowsstyle und dann der Parameter angegeben werden.

Code: Alles auswählen

shell("D:\PDF-XChangeViewer\PDF Viewer\PDFXCview.exe",1,"Lw:\Ordner\Dokumentname.pdf")

Bei meinem Test hat es so funktioniert

theindless

[balu]

Hallo sven-my

und bei mir hier hat auch das funktioniert.

Code: Alles auswählen

Sub Main
lw = "E:\"
Ordner = "OFFICE\OFFICE_Dateien\"
Dokumentname = "tutorial"
Shell("E:\PDFX_Vwr_Port\PDFXCview.exe", 1, lw & Ordner & Dokumentname & ".pdf")
End Sub

Gruß
balu

[sven-my]

Hallo theindless,

herzlichen Dank, bei mir klappt's auch !

Hast recht - ich Doofkopp hätte auch mal in die Hilfe unter >shell< suchen können !

gruß
sven-my

P.S.: auch Dir, Balu, herzlichen Dank

[sven-my]

Hallo miteinander,

hab' noch ein Problem : wenn der Dateiname SPACE's (Leerzeichen) enthält, funktioniert es nicht mehr.

Gibt es außer mit irgendwelchen anderen Zeichen aufzufüllen, noch eine Möglichkeit, den Reader per Makro zu bewegen das PDF-Dokument zu öffnen ?

gruß
sven-my

[turtle47]

Hallo,

versuche es doch mal so:

Code: Alles auswählen

  set extShell = CreateObject("Shell.Application")
  extShell.Open "D:\PDF Files\Dein PDF Dokument.pdf"

Jürgen

[sven-my]

Hallo Jürgen,

das war die Rettung !

ich war schon drauf und dran meine gesammte Adress-Datenbank, und alle Makros, die Dateien speichern, umzustricken; denn die Empfängernamen sind bei mir immer ein Teil des Datei-Namens unter dem gespeichert wird.

Herzliche Dank

gruß
sven-my

[RudiRuessel]

Danke Jürgen! Ich hing da auch fest und mit deiner Lösung klappts jetzt wunderbar