Ist es notwendig in der äußeren Schleife das
OLE-Objekt excel_obj_tar immer wieder neu erstellen und zu zerstören?
Musst du in der inneren Schleife jedes Mal beim Schreiben einer Zelle excel_obj_tar.ActiveWorkbook.Save; aufrufen oder würde es einmalig danach reichen?
Die Zeilen fromFile := GetDirDesktop() + 'testdata\UploadTemplate.xlsx'; und directory := GetDirDesktop() + '\testdata\gen'; sowie ErstelleDir(directory); brauchen meiner Meinung nach auch nicht in der äußeren Schleife zu sein, scheint mir unnötig.