mit meinem Makro möchte ich alle Unterverzeichnisse eines Pfads auslesen,
doch leider bekomme ich als "Anwort" immer nur "." zurück.. Ich könnte ja
direkt auf die jeweiligen Unterverzeichnisse "zeigen" - Problem ist nur, daß
immer mal wieder welche hinzukommen oder gelöscht werden..
Das Hauptverzeichnis:
C:\AKTIONEN
Die Unterverzeichnisse:
z.B.
C:\AKTIONEN\TEST1
C:\AKTIONEN\GEHT
C:\AKTIONEN\NICHT
Mein Testmakro, daß mir nur "." meldet:
Sub AktionenDirList()
str = Verz("C:\AKTIONEN\*.*"; vbVerzeichnis)
MeldungsDlg(str)
Ende Sub
Ich hoffe es gibt eine Lösung in dieser Richtung.. Leider muß das Makro in Excel 5.0 laufen und die Unterverzeichnisnamen in einer extra Datei ablegen, wollte ich auch nicht..
Vielen Dank
Thomas