Herbers Excel-Forum - das Archiv

Dateiname aus Pfad+Dateinamen

Bild

Betrifft: Dateiname aus Pfad+Dateinamen
von: Jens

Geschrieben am: 17.03.2005 15:34:52
Hi
Ich habe ein kleines Problem. Ich habe eine Variable, welche mit der vollständigen Pfadangabe (A:\Test\test.xls) belegt ist.
Nun such ich nach einen einfachen Weg, um die Pfadangaben da rauszukriegen.
Ziel ist da nur noch (test.xls) in der Variable zu haben.
Wer kann mir dabei helfen?
Bild

Betrifft: AW: Dateiname aus Pfad+Dateinamen
von: Frank Domke

Geschrieben am: 17.03.2005 15:43:45
Hallo Jens,
eine Lösung wäre:
strDateiname = Dir("A:\Test\test.xls")
Dir gibt "nur" den Dateinamen zurück und prüft bei der Gelegenheit, ob die Datei überhaupt existiert.
Eine andere Lösung wäre:
strDateiname = Mid("A:\Test\test.xls",InstrRev("A:\Test\test.xls","\")+1)
Viel Erfolg
Frank.
Bild

Betrifft: AW: Dateiname aus Pfad+Dateinamen
von: Labossa
Geschrieben am: 17.03.2005 16:03:54
Hey, so geht'S:
Sub test()
dat = "a:\test\test.xls"
pos_last_slash = InStrRev(dat, "\")
newname = Right(dat, Len(dat) - pos_last_slash)
End Sub

Bild

Betrifft: AW: Dateiname aus Pfad+Dateinamen
von: Jens Sittel
Geschrieben am: 18.03.2005 08:22:23
Danke für die Lösungen.
Es funktioniert
Jens
 Bild
Excel-Beispiele zum Thema "Dateiname aus Pfad+Dateinamen"
Dateinamen filtern Dateiname aus dem vollen Namen extrahieren
Dateiname vorgeben bei Druck in Printdatei Dateinamen in Listbox
Dateinamen in Tabelle einlesen Dateinamen eines Verzeichnisses als HTML-Datei
Grafik nach Eingabe des Dateinamens einfügen Dateinamen in TabStrip-Elemente einlesen
Datei entsprechend der Eingabe des Dateinamens öffnen Dateinamen in UserForm-ComboBox einlesen und Datei öffnen