PDF in Excel
04.01.2007 11:37:26
Ben
hab wieder eine Frage...
Möchte in meiner Exceltabelle auf extern PDF's per Link zugreifen und diese öffnen lassen...Irgendwie funktioniert das nicht, es wird nur das PDF Programm geöffnet, nicht aber die Datei...
Benutze folgendes Makro...
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
Declare
Function GetActiveWindow Lib "user32.dll" () As Long
Const SHOWMAXIMIZED = 3
Const SHOWNORMAL = 1
Sub pdfAufruf()
ShellExecute GetActiveWindow, "Open", "c:\test.pdf", "", "", SHOWMAXIMIZED
End Sub
Kann mir einer weiterhelfen?
Gruß
Ben