Loop-Code kopiert immer wieder von derselben Excel-Tabelle in einem Ordner

Question

Ich habe also versucht, eine Liste von Excel-Dateien in einem Ordner (Dateiname und -pfad) erstellen und dann mit einer für Loop ein bestimmtes Arbeitsblatt für alle in einem bestimmten Arbeitsblatt in einem bestimmten Arbeitsblatt in der Excel-Arbeitsbuch aufgeführten Dateien einfügen und einfügendas enthält das Makro.Bisher funktioniert alles, mit Ausnahme der Tatsache, dass dieselbe Datei nicht kopiert und anstelle aller Dateien überlegt wird.Das Makroschlaufen für die richtige Anzahl von Malen, aber es verwenden nicht alle Excel-Dateien.

Hier ist der Code:

Erster Teil zum Auflisten der Dateien im Ordner

generasacodicetagpre.

und das ist der Teil für die Schleife

generasacodicetagpre.

basierend auf der Quelle des Fehlers, d. H. Dieselbe Datei, die verwendet wird, errätze ich, dass das Problem mit dem Teil liegt, der dies hat:

copypath= thetworkbook.worksheets ("leaderport"). Bereich ("c" & copypathrow)

und ist "vermutlich", um in der für Schleife über dieses Update zu aktualisieren:

copypathrow= copypathrow + 1

Answer 1

Bewegen Sie die Leitung

CopyPath = ThisWorkbook.Worksheets("LeaveReport").Range("C" & CopyPathRow)

Innerhalb der Schleife, dieser Wert von generationstechnischetagcode wird niemals geändert, aber der Wert von generationstechnischetagcode ist.

edit: Ich würde diese Rekursion auch nicht anrufen.