Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1584to1588
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1584to1588
1584to1588
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Teil des Pfades / bestimmte Stelle

Teil des Pfades / bestimmte Stelle
25.10.2017 23:19:08
Sergej
Hallo Leute,
wie kann ich mir per VBA von einem Pfad den Teil zwischen zwei / (nach dem Laufwerksbuchstabe quasi den zweiten Verzeichnis) auslesen:
Beispiele:
D:/Projekte/2017/....
S:/Mueller-Schulte/Daten/....
Als Ergebnis soll es "2017" bzw. "Daten" stehen.
Danke vorab.
Gruß,
Sergej

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Teil des Pfades / bestimmte Stelle
25.10.2017 23:38:15
Luschi
Hallo Sergej,
das geht so:
Dim pfad As String
pfad = "D:\Projekte\2017\Januar\"
MsgBox Split(pfad, "\", -1, vbTextCompare)(2)
Gruß von Luschi
aus klein-Paris
AW: Teil des Pfades / bestimmte Stelle
25.10.2017 23:39:15
Martin
Hallo Sergej,
habe es als Function gemacht, damit du es auch als Excel-Formel verwenden kannst:
Sub Beispiel()
MsgBox SecondFolder("D:/Projekte/2017/")
End Sub
Function SecondFolder(strPfad As String)
SecondFolder = Split(strPfad, "/")(2)
End Function
Viele Grüße
Martin
AW: Teil des Pfades / bestimmte Stelle
25.10.2017 23:46:04
Sergej
Danke Luschi! Danke Martin!
Beste Grüße,
Sergej
www.office-hilfe.com/support/showthread.php/22254
26.10.2017 09:50:04
lupo1
=GLÄTTEN(TEIL(WECHSELN(A1;"/";WIEDERHOLEN(" ";99));199;99))
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige