Ich suche nach einer Lösung, in VBA, mit aus allen Excelfiles aus einem Verzeichnis die Spalte a zusammenführen kann in eine Gesammelte Excel, in ein Blatt, sodass alle je Datei eine Spalte a-xx befüllt wird.
Die Dateien befinden sich alle in einem Verzeichnis C:\test\U09004708_ALL und sind je nach Land allLanguages_PLK_XXX.xlsx benannt. Es sind 17 Excelfiles
Mein bescheidener Versuch war wie folgt:
For i = 1 To 17 Step 1
Workbooks.Open Filename:="C:\test\U09004708_ALL\*.xlsx"
Workbooks(Workbooks.Count).Worksheets("Lastkollektive").Range("A:A").Copy
Workbooks(1).Worksheets(1).Cells(1, i).Paste
Workbooks(Workbooks.Count).Close SaveChanges:=False
Next
Aktuell erhalte ich einen 1004 Laufzeitfehler, welcher sagt, dass die Datei nicht gefunden wird. Jedoch habe ich den Pfad kopiert.
Leider kenne ich mich in VBA nicht gut aus und weiß z.B. nich twas Worksheets "Lastkollektive" ist