Hallo zusammen,
folgende Problemstellung: In einem Verzeichnis befinden sich mehrere xlsm-Dateien, die sich vom Dateinamen her lediglich durch eine fünfstellige Zahl voneinander unterscheiden.
Beispiel: Verladung-AV-#####.xlsm
Ich öffne nun ein neues leeres XLSM-Dokument. Hier möchte ich in A1 beginnend diese Nummer stehen haben.
Das Makro soll also die erste Datei im Verzeichnis hernehmen, im Dateinamen nach der fünfstelligen Nummer suchen, nur diese kopieren und in meinem neuen XLSM-Dokument in A1 einfügen.
Dann nimmt er sich die nächste Datei und macht das gleiche, fügt die fünfstellige Nummer in B1 ein, usw. Bis alle 1000 Nummern in der obersten Zeile Spalte für Spalte nebeneinander stehen.
Wie geht so etwas? Macht man das mit dem FileSystem-Objekt?
Gruß
IrishStu
folgende Problemstellung: In einem Verzeichnis befinden sich mehrere xlsm-Dateien, die sich vom Dateinamen her lediglich durch eine fünfstellige Zahl voneinander unterscheiden.
Beispiel: Verladung-AV-#####.xlsm
Ich öffne nun ein neues leeres XLSM-Dokument. Hier möchte ich in A1 beginnend diese Nummer stehen haben.
Das Makro soll also die erste Datei im Verzeichnis hernehmen, im Dateinamen nach der fünfstelligen Nummer suchen, nur diese kopieren und in meinem neuen XLSM-Dokument in A1 einfügen.
Dann nimmt er sich die nächste Datei und macht das gleiche, fügt die fünfstellige Nummer in B1 ein, usw. Bis alle 1000 Nummern in der obersten Zeile Spalte für Spalte nebeneinander stehen.
Wie geht so etwas? Macht man das mit dem FileSystem-Objekt?
Gruß
IrishStu