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

Teil des Pfades

Forumthread: Teil des Pfades

Teil des Pfades
04.10.2017 00:08:56
Sergej
Hallo Leute,
ich bekomme mit diesem Code von der aktive Datei 17518-2--AKT-GRU010-03_DT0001-.xlsx
als Ergebnis 17518-2--AKT-GRU010-03_DT0001-
MsgBox Left(ActiveWorkbook.FullName, InStrRev(ActiveWorkbook.FullName, ".") - 1)
Was muss ich bitte ändern, damit ich 17518-2--AKT-GRU010-03 bekommen, sprich von rechts aus gesehen alles was vor dem Unterstrich steht?
Gruß,
Sergej
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Teil des Pfades
04.10.2017 01:44:45
Luschi
Hallo Sergej,
statt: MsgBox Left(ActiveWorkbook.FullName, InStrRev(ActiveWorkbook.FullName, ".") - 1)
muß es: MsgBox Left(ActiveWorkbook.Name, InStrRev(ActiveWorkbook.FullName, ".") - 1)
sein, um den Dateinamen ohne Dateierweiterung zu erhalten.
Bei .FullName hängt noch der gesamte Dateipfad davor dran.
Deine gesuchte Lösung:
MsgBox Left(ActiveWorkbook.Name, InStrRev(ActiveWorkbook.FullName, "_") - 1)
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Teil des Pfades
04.10.2017 01:50:04
Sergej
Danke Luschi!
Gruß,
Sergej
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18