Moin,

ich habe folgendes vor:

Mir liegt eine Ordnerstruktur mit mehreren Unterordnern in Baumstruktur vor. Im "obersten" Ordner liegt meine Ziel-Exceldatei. Jeweils im "untersten" Unterordner liegt eine Datei, die immer vom selben Typ und mit selbem Namen ist. Die Unterordner sind in keinem bestimmten Muster benannt.

Nun möchte ich mittels VBA alle Unterordner durchsuchen und jedesmal wenn die jeweilige Datei gefunden ist, diese öffnen, den Inhalt in ein neu erstelltes Sheet kopieren und dem Sheet den Namen des Ordners geben, in dem sich die Datei befand.

Mein Problem ist nun, dass ich die folgenden Möglichkeiten (Mögl.1 und Mögl.2) gerne aufgrund der Komplexität ausschliessen möchte. Gibt es noch andere Wege (je einfacher und übersichtlicher, desto besser) mein Problem zu lösen?

Ich hoffe ihr habt diesbezüglich Hilfen für mich!

Gruß

Lars