Hallo VBA-Freaks,
ich bräuchte bitte kurz eure Hilfe:
activeworkbook. path ist der ganze Pfad. Ich brauche nur den letzten Unterordner.
z. B.: C:\....\Länder\Ägypten - Die Datei liegt im Ordner Ägypten.
Vielen Dank für eure Hilfe
PeTeR
AW: Unterorden der Datei per VBA
Oberschlumpf
Hi Peter
Meinst du so?
Sub sbTest()
Dim larstrUnterordner() As String
larstrUnterordner = Split(ActiveWorkbook.Path, "\")
MsgBox larstrUnterordner(UBound(larstrUnterordner))
End Sub
mit MsgBox wird die unterste Verzeichnisebene von ActiveWorkbook.Path angezeigt.
(allerdings weiß ich nicht, ob es in Excel 2007 noch die Split-Funktion gibt)
Hilfts?
Ciao
Thorsten
AW: Unterorden der Datei per VBA
Luschi
Hallo Thorsten,
die Split()-Funktion gibt es auch in Excel2007 noch!
Gruß von Luschi
aus klein-Paris
vielen Dank für die Info!...owT
Oberschlumpf
AW: Unterorden der Datei per VBA
PeTeR
Hallo Thorsten,
SUPER - ja, genau so!!
Die Funktion SPLIT kannte ich noch gar nicht - man lernt eben nie aus.
Ganz herzlichen Dank
PeTeR