PDF-Dateien aus Excel aufrufen - Die Lösung
26.02.2004 18:20:57
Martin M.
Nun habe ich eine Lösung gefunden, wie man Dateien verschiedener Anwendungen aus Excel aufrufen kann, ohne den Pfad der Anwendung wissen zu müssen. Einfach die folgenden Codezeilen in ein Modul eingeben und den Dateinamen angeben.
Der letzte Parameter gibt an wie das Fenster angezeigt wird (maximiert, minimiert usw.)
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String,
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Sub testen()
Call ShellExecute(1, "Open", "c:\temp\Dateiname.pdf", 0&, 0&, 1)
End Sub
Grüße
Martin M.