Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: PDF öffnen mit variblem Dateinamen

PDF öffnen mit variblem Dateinamen
06.07.2018 12:49:32
Hendrik
Hallo zusammen,
bei folgendem Code brauche ich wieder mal eure Hilfe.
Die PDF soll via VBA geöffnet und kopiert werden.
Nur ändert sich mein Dateiname der PDF immmer. Der Pfand bleibt gleich.
Gibt es eine getopenfile Lösung oder etwas anderes für das Problem?
Sub OeffnePDF()
Dim Datei As String
Worksheets("Tabelle1").Select
Range("A1").Select
Datei = "C:\Mails\Tool\06.07.2018"
ActiveWorkbook.FollowHyperlink Datei
'Zwischenablage:
SendKeys "^a", True
SendKeys "^c", True
'pdf Schließen:
SendKeys "%{F4}"
'In Excel-Tabellenblatt einfügen
ActiveSheet.Paste
End Sub
Vielen Dank vorab!
VG
Hendrik
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: PDF öffnen mit variblem Dateinamen
06.07.2018 14:16:29
Rob

Dim Filename As String
Dim Filepath As String
Filepath = "C:\Mails\Tool\"
Filename = Dir(Filepath & "*.pdf")
ActiveWorkbook.FollowHyperlink Filepath & Filename

AW: PDF öffnen mit variblem Dateinamen
06.07.2018 14:41:04
Hendrik
So einfach? Oh man sorry.... Vielen Dank Rob!
AW: PDF öffnen mit variblem Dateinamen
06.07.2018 15:00:25
Rob
LOL! Gerne geschehen. :-)
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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