Ich möchte aus einem Ordner mit über 3000 csv Dateien, jeweils eine CSV Datei in eine vorhandende Excel Datei einlesen und diese dann als normal xlxs Datei speichern.

Ok soweit.

Die ursprüngliche Excel Datei hat über 15 Arbeitsmappen.

Ergibt keinen Sinn, denn eine Excel Datei IST eine Arbeitsmappe (engl.: Workbook).

Die CSV Datei soll in die Arbeitsmappe 'RawData' einglesen werden (Semikolon Trennung).

Seltsam, in deinem Code ist RawData ein Tabellenblatt (engl.: Worksheet).

Wenn die Daten eingelesen sind, soll die Datei gespeichert werden, der Name der neuen Datei ist in Zelle RawData A284 und RawData J284.

Welche Datei?

Nach erfolgreich erstellter Excel Datei soll die CSV Datei aus dem Ornder gelöscht werden.

Ok.

Kurzum:

1. Begrifflichkeiten sind wichtig; falsch verwendete Begriffe verwirren andere nur.
   • mach dich vorher schlau, was wie genannt wird (z.B. in der Dokumentation)
2. In deinem Fall sollte bei Refresh noch BackgroundQuery := False angegeben werden, es ist zumindest sauberer als es wegzulassen.
   • das bewirkt, dass der Code erst fortgesetzt wird, wenn alle Daten gesammelt wurden / vorhanden sind
3. Mac ist anders als Windows. So funktionieren manche Dinge nicht wie unter Windows gewohnt.
   • Dir() und Platzhalter funktioniert unter Mac nicht
   • das wüsstest du, wenn du dir die Dokumentation von Dir() zu Gemüte geführt hättest
   • ERINNERUNG: Forum konsultieren kommt NACH Dokumentation lesen
4. SaveCopyAs kann den Dateityp nicht ändern.
   • Du führst den Code in einer xlsm aus und versucht diese xlsm dann als xlsx zu speichern -> korrupte Datei
   • besser wäre:
     • newFilename = ...
     • Worksheets("RawData").Copy ' kopiert das Blatt ein eine neue Mappe
     • ActiveWorkbook.SaveAs(newFilename, XlFileFormat.xlOpenXMLWorkbook) ' speichert die neue Mappe als xlsx
     • ActiveWorkbook.Close() ' schließt die neue Mappe

Grüße

PS: Ich habe den Code nur kurz überflogen.