Mein Plan war den Sub mit F8 langsam durch zuegehen.
Habe noch etwas recherchiert und wenn ich es richtig verstanden habe hat mir ein "Wertezuweisung" für das Objekt gefehlt.
Das Problem ist jetzt weg und ich habe nur folgende Zeile ergänzt:
Set objFSO = New Scripting.FileSystemObject
Irgenwie erstellt er den Unterordner aber nicht an der richtigen Stelle ich begebe mich nochmal auf die Suche
|