Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1524to1528
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

variabler Dateipfad und Dateiname

variabler Dateipfad und Dateiname
24.11.2016 13:27:09
Patrick
Hallo,
habe schon in einem anderen Forum diese Frage gestellt. Jedoch kann / will mir da keiner helfen.
Und zwar gehts ums folgendes.
Ordnerstruktur:
Ordnerebene1: definiert
Ordnerebene2: definiert
Ordnerebene3: variabel. definiert sind hier nur die letzten Zeichen (Datum). (sind max. 15 Ordner mit den namen z.B.: Freitag_31.10.2016, Mo-Do_01.04.2015,...)
Dateiname: variabel. Endet jedoch immer mit einem "_G".
Nun meine Frage:
Gibt es die möglichkeit, anhand des Datum welches bekannt ist, den Ordner zu suchen und zu öffnen und dann die PDF-Datei mit dem ende _G zu öffnen.
http://www.office-loesung.de/p/viewtopic.php?f=166&t=727343
Vielleicht kann mir jemand helfen und hoffenltich war das jetzt verständlich genug.
Mfg Patrick

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: variabler Dateipfad und Dateiname
24.11.2016 13:32:36
Patrick
noch zusätzlich:
das ganze wird von einer Userform mittels Button geöffnet:
Userform1
Ordnerebene2: Textbox5
Ordnerebene3: Textbox3 (Datum)
AW: variabler Dateipfad und Dateiname
24.11.2016 14:11:24
Rudi
Hallo,
Ordner = dir(ordner1 & "\" &ordner2 & "\" & "*" &Datum ,vbDirectory)
Dateiname = dir(Ordner & "\*_G.pdf",vbnormal)
Gruß
Rudi
AW: variabler Dateipfad und Dateiname
24.11.2016 15:21:52
Patrick
Besten Dank für die Hilfe.
Es kommt zumindest keine Fehlermeldung mehr :D
Jedoch öffnen tut sich nix.
Hier mal der geänderte Code:
Ordner = Dir("C:\Users\patri\Desktop\Pläne\" & UserForm1.TextBox5.Text & "\" & "*" & UserForm1. _
TextBox5.Text, vbDirectory)
Dateiname = Dir(Ordner & "\*_G.pdf", vbNormal)
Vielleicht habe ich da was missverstanden?
Lg
Anzeige
AW: variabler Dateipfad und Dateiname
24.11.2016 15:39:25
Rudi
mein Fehler
Dateiname = Dir("C:\Users\patri\Desktop\Pläne\" & UserForm1.TextBox5.Text & "\" &Ordner & "\*_G.pdf", vbNormal)
Gruß
Rudi
AW: variabler Dateipfad und Dateiname
25.11.2016 17:24:52
Patrick
Hallo, danke nochmal
jedoch tut sich wieder nix. Keine Fehlermeldung oder sonst was. :(
mach ich irgendwas falsch?
MFG

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige