Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

pdf-Datei öffnen

Forumthread: pdf-Datei öffnen

pdf-Datei öffnen
21.11.2005 14:44:33
Christoph
Hallo
Ich brauchte für mein Programm eine Hilfe-Datei, die ich in einer pdf-Datei darstellen möchte.
Kann man mit VBA eine pdf-Datei öffen und wenn ja wie?
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: pdf-Datei öffnen
21.11.2005 14:50:01
hier
Option Explicit
Private Declare Function GetShortPathName Lib "kernel32.dll" Alias "GetShortPathNameA" ( _
ByVal lpszLongPath As String, _
ByVal lpszShortPath As String, _
ByVal cchBuffer As Long) As Long
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
Private Declare Function GetActiveWindow Lib "user32.dll" () As Long
Private Const MAX_PATH = 260&
Private Const SW_MAXIMIZE = 3&

Private Sub prcOpen_PDF()
Dim strPath As String, strShortPath As String, strFile As String
strFile = "doku.pdf"
strPath = "H:\Powerpoint Präsentation\"
strShortPath = Space(MAX_PATH)
GetShortPathName strPath & strFile, strShortPath, MAX_PATH
ShellExecute GetActiveWindow, "open", strShortPath, "", strPath, SW_MAXIMIZE
End Sub

Anzeige
AW: pdf-Datei öffnen
21.11.2005 15:19:26
Christoph
Hammer!! Es funktioniert!!
Danke!!!
AW: pdf-Datei öffnen
22.11.2005 16:37:55
Christoph
Gibt es eine Weg, dass ich nicht den ganzen Pfad angeben muss wie
zum Beispiel: ...\\
an stelle von: C:\Dokumente und Einstellungen\Eigenen Datein
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige