Super, das ist mega cool besten Dank.
Ein allerletzte Frage hätte ich noch. Wenn ich statt auf dem Desktop die Datei auf dem Laufwerk speichern möchte z.B. auf "P:\XXX_sdf\asdf\" funktioniert das bei mir mit: Call .SaveAs ("P:\XXX_sdf\asdf\" & strName, xlOpenXMLWorkbook) leider noch nicht. Die Fehlermeldung lautet "Laufzeitfehler 1004".
Wenn ich den Pfad (P:\XXX_sdf\asdf\) allerdings in eine Zelle z.B. A7 fest eintrage und mit Range("A7").Value in der Formel aufrufen lasse, wird die Datei gespeichert.
Hättest du noch eine Idee wo der Fehler liegen könnte, wenn ich den Pfad des Speicherorts auf dem Laufwerk direkt in den VBA Code mit aufnehme?
|