Letzter Speichertag von Datei
23.03.2005 18:35:31
Datei
möchte Sicherung abspeichern.Wie bekomme ich Speichertag
von "D:\versuch\Sicherung\versuch.xls" heraus?
Application.DisplayAlerts = False
if speichertag = date - 1 then '?Speichtag?
ActiveWorkbook.SaveAs Filename:= _
"D:\versuch\Sicherung\versuch.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
end if
ActiveWorkbook.SaveAs Filename:= _
"D:\versuch\versuch.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Application.DisplayAlerts = True