EXCEL-Datei doppelt (in versch. Ordnern speichern

Computer: Software & Programmierung Office Software
1

Hallo,

ich möchte eine EXCEL-Datei auf Mausklick oder sonstwie immer in zwei verschiedenen Verzeichnissen auf einmal speichern, also z.B.
in
c:\eigene Dateien\Beispiel.xls
und
c:\Datensicherung\Beispiel.xls

D.h. also unter dem gleichen Dateinamen.

Weiß jemand, wie das mit Makro oder anders funktioniert?

Gruß und Danke
Christian

2

Hallo Christian,

hier das Makro:

Sub SpeichernZweiMal()

ActiveWorkbook.SaveAs FileName:="c:\eigene Dateien\Beispiel.xls"
ActiveWorkbook.SaveAs FileName:="c:\Datensicherung\Beispiel.xls"

End Sub

gruss moritzbock

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Danke, perfekt (owT.)
…

4

Noch ´ne Frage
Wie kann ich das Makro so erweitern, daß die Frage, ob eine bestehende Datei ersetzt werden soll, gleich mit „ja“ beantwortet wird, ohne daß ich lange rumklicken muß?

Danke nochmal

Christian

5

Hallo Christian,

ich habe das Makro mal abgeändert auf …

ActiveWorkbook. SaveCopyAs "c:\eigene Dateien\Beispiel.xls"
ActiveWorkbook. SaveCopyAs "c:\Datensicherung\Beispiel.xls"

Jetzt sollte keine Meldung mehr kommen (bei mir kommt jedenfalls keine!)

Ein Problem besteht weiterhin, wenn Du aus einer geöffneten Beispiel.XLS diese Makro ausführst - eine geöffnete Datei kann nicht überschrieben werden!

gruss moritzbock

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

1 „Gefällt mir“
6

Hallo Moritz,

Ein Problem besteht weiterhin, wenn Du aus einer geöffneten
Beispiel.XLS diese Makro ausführst - eine geöffnete
Datei kann nicht überschrieben werden!

hmja, stimmt, das hatte ich vergessen.

Gruß und Danke
Christian

7

Hallo,

wie und wo füge ich dieses Makro ein ?

Danke !

Gruß

Winni