Office: automatisches Speichern per Makro mit dynamischen Dateinamen

Guten Morgen alle zusammen,

wieder ein neuer Tag mit einer neuen Herausforderung *wink.gif*
Folgende Problematik:
Ich habe mir ein Makro gebaut was erst verschiedene Formatierungen durchführt und anschließend die Datei automatisch speichert mit folgendem Befehl:
Code:

Dieses Makro wird jedoch nicht nur in einer, sondern in 17 Dateien nacheinander ausgeführt, die jedoch alle andere Namen haben (Auswertung_1.xls, Auswertung_bke.xls, etc.). Wenn ich also die Datei nicht jedes mal nach ausführen des Makros händisch ändere wird sie beim nächsten ausführen des Makros überschrieben.

Daher meine Frage, gibt es einen Makrobefehl mit dem ich den urspründlichen Dateinamen beibehalten (Auswertung_1 etc) kann und nur aus einer .xls Datei eine .txt Datei mache?

Vielen Dank im Voraus für eure Hilfe!! *Smilie

:)

 

Moin, HamJung,

z.B. (ungetestet]

Code:

 

geht schon mal in die richtige Richtung!
Die Datei wurde jetzt in dem korrekten Format gespeichert und hat auch ihren ursprünglichen Namen beibehalten.

Kann man in die Formel jetzt noch irgendwie einfügen, dass er sie wieder in dem alten Pfad "\\Server\Daten\" abspeichert? Dann würde man vermeiden die Dateien händisch alle auszuschneiden und zu verschieben.

 

Moin, HamJung,

dann nur Name(nur Dateiname) statt FullName (Pfad und Dateiname) verwenden und den ersten Teil durch eine Konstante ersetzen:

Code:

Zum kommentar- (und nachfragelosen) Überschreiben einer vorhandenen Datei vorher Application.DisplayAlerts = False und hinter ~ = True (bitte unbedingt setzen, sonst erscheinen keine Meldungen mehr, auch nicht, wenn eigentlich unbedingt notwendig: ade, ihr schönen Daten *wink.gif*).

 

super, vielen Dank!! *Smilie*10points