Option Explicit Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.SaveCopyAs "W:\Eigene Dateien\Hajo\Internet\Test\2014\" & Format(Date, "YYMMDD") & "_" & ThisWorkbook.Name End Sub
58.5k Fragen
250k Antworten
7.1k Nutzer