Office: (Office 2010) Verzeichnis auslesen

Hallo Freunde

ich habe die Notwendigkeit Dateien in einem Verzeichnis incl dessen Unterverzeichnisse auszulesen.

Code:

Für das "Stammverzeichnis" funktioniert dies auch schon. Was muß ich tun um die Unterverzeichnisse auch auslesen zu können?

Ps.: Damit die Übersichtlichkeit nicht verloren geht, habe ich alles was zum Thema nicht dazu gehört entfernt.

:)

 

Hallo Edgar,

mit Dir kommst Du da nicht weiter, FileSystemObject ist Dein Freund:

Code:

 

Als Ergänzung: Dir kann man auch rekursiv aufrufen, siehe Ordner mit Dir$ rekursiv durchsuchen
Daneben gibt es noch FileSearch, ab Acc2007 gibt es das nicht mehr als festen Bestandteil, aber als Ersatzklasse, siehe Acc2003 - Erste 8 Stellen aus Dateinamen auslesen

 

Danke - ich werde mal die einzelnen Lösungen ausprobieren.

 

Hallo Maxel

Ich habe Deinen Code ausprobiert. Ich bekomme gleich bei der ersten "Dim-Anweisung" die Fehlermeldung "Benutzerdefinierter Typ nicht deklariert".

Fehlt da noch was? Was muß ich tun?

Ps.: Beim Eingeben von "Dim as" kommt die Auswahl "New" (intelli sence) aber nach dem "New" gibt es kein "FileSystemObject". Liegt es daran?

 

Bei FSO musst Du einen Verweis auf "Microsoft Scripting Runtime" setzen oder eben Late Binding verwenden.

 

Hallo Maxel

Ich habe Deinen Vorschlag umgesetzt und funktioniert auch.
Nun muß ich aber feststellen, daß die angezeigten Dateien nicht sortiert sind. Kann ich dies iregndwie bewerkstelligen ohne daß ich alles in eine Matrix einlesen muß und dann diese sortieren muß?

 

Das stimmt aber nicht. Die Dir-Schleife wie auch die FSO-Schleife geben die Dateien alphabetisch sortiert nach Dateinamen zurück, natürlich bezogen auf das jeweilige (Unter)Verzeichnis.