Clever-Excel-Forum

erstmal ein freundliches Hallo an Euch

und nun die Frage 

besteht die Möglichkeit die aktuelle Mappe zu speichern unter einem anderen Namen auf einem anderen Laufwerk.
Die dann zu schliessen und die alte Mappe wieder öffnen.

die alte Mappe wird aber immer unter dem Datum gespeichert.


habe dies mit dem Makrorekorder aufgezeichnet 

         ChDir "E:\Anzeige"
    ActiveWorkbook.SaveAs Filename:= _
        "E:\Anzeige\heute.xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
    ActiveWorkbook.Close


dies habe ich im Netz gefunden aber es funktioniert nicht

    Application.RecentFiles(1).Open

Hallo,

geht das?


mfg

leider nein

Moin!
Nicht .SaveAs
sondern .SaveCopyAs

Du siehst die Kopie nicht!
Sie wird folglich gar nicht geöffnet.
ThisWorkbook bleibt weiter geöffnet.

Gruß Ralf

Sub Rotationsanzeige()
'
' Rotationsanzeige Makro
'

'
        ActiveWorkbook.SaveCopyAs Filename:= _
        "E:\Anzeige\heute.xlsm", _
        ActiveWorkbook.Close
   
End Sub


Syntaxfehler 

Bei mir funktionierte
ThisWorkbook.SaveCopyAs "I:\Kopie.xlsm"
problemlos.