Excel Datein importieren

[waldemarrrrr]

Guten Abend miteinander,

Ich habe ein Makro welches das erste Tabellenblatt aus allen Datein in einem Ordnerverzeichnis importiert.
Das Problem ist jedoch, dass ich insgesamt 12 Orderverzeichnisse habe.

Ich möchte über eine Dropdown-Liste ein bestimmtes Ordnerverzeichnis auswählen können, aus dem die Tabellenblätter importiert werden. 
(Beispiel siehe Anhang)

Bin über eine Umschreibung des Makros sehr dankbar!


Viele Grüße,
Waldemarrrrr

[Fennek]

Hallo,

nur ein paar Fragen:

- sind das Unterverzeichisse?
- git es Leerzeichen bzw Sonderzeichen (dt Umlaute) in den Verzeichisnamen?

mfg

PS: mit vb-arrays kommst du klar?

[waldemarrrrr]

Hallo Fennek,

Ja genau es handelt sich um Unterverzeichnisse, die sich bwsp. in den Order "Documents" befinden. Ich habe dann für jeden Monat ein Verzeichnis erstellt, in dem sich die Datein befindet. Letztlich kannst du die Verzeichnisnamen in der Zelle B2 sehen. 

Die Namen der Verzeichnisse enthalten keine Sonderzeichen oder Leerzeichen, sofern ein Unterstrich nicht als Sonderzeichen gilt :)

Mit VB-Arrays kenne ich mich leider nicht aus.


Danke und viele Grüße,
Waldemarrrrr

[Kuwer]

Hallo,

ersetze

      sPfad = "C:\Users\Documents\Monat_01\"

durch

      sPfad = "C:\Users\Documents\" & ThisWorkbook.Worksheets("Portfolio").Range("B2").Value & "\"

Gruß Uwe

[waldemarrrrr]

Hallo Uwe,

vielen lieben Dank, das klappt super!

Viele Grüße,
Waldemarrrrr