dieses Makro habe ich um eine Datei neu zu speichern !!
Das Funktioniert auch Super mit einer Ausnahme es speichert die ganze Mappe.
Kann man das so ändern das nur die Tabelle gespeichert wird, unter vorbehalt wie unter mit KW und Datum, sowie das keine Makros und Button gespeichert werden.
Sub Sicherung()
Dim strFileName As String
strFileName = "D:\Firma\Test\Test\Plan" & DINWeek(Now) & "_" & Year(Now) & ".xls"
ThisWorkbook.SaveCopyAs Filename:=strFileName
End Sub
währe für die Hilfe sehr dankbar
Gruß Thorsten