Datei unter Datum und Uhrzeit speichern
Schmausi
ich beabsichtige meine aktuelle Datei unter dem derzeitigen Datum und Uhrzeit zu in einem speziellen Ordner zu speichern. dies soll aber über VBA im Woorbook_BeforreSave deklariert sein.
Habe leider vergeblich einige Versuche unternommen.
Ich erbitte HILFE!
unter anderem ein Versuch:
Sub spUakTim()
ChDir "D:\meine Dateien\Eigene Dokumente\Excel\EXCEL\FAM\Sumpf\Schmausi\Planungshilfe"
ActiveWorkbook.SaveAs Filename:= _
"D:\meine Dateien\Eigene Dokumente\Excel\EXCEL\FAM\Sumpf\Schmausi\Planungshilfe\ _
20100_40_08_1845.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub
Für den Bereich des
'
Sub ... "2010_40_08_1845" sollte das aktuelle Datum mit Uhrzeit stehen.
also für mich sollte die aktuelle Datei im Vorgegebenen Ordner unter dem aktuellem Datum mit _
Uhrzeit zufinden sein.
Zum Beispiel: im Laufwerk "D" Ordner" .... "Planunghilfe" Dateiname: "Datum Uhrzeit"
Für eine hilfreiche Anwort bedanke ich mich
Gruß Schmausi