Aktuelles datum in dateinamen einfügen
11.08.2006 11:26:46
Hägar
ich würde gerne mittels vba-code ein excel-workbook abspeichern. Es soll immer den gleichen Namen haben, aber am Anfang des Dateinamens sollte das aktuelle datum eingefügt werden (z.B.: "060811_Book1.xls" für heute).
Ich verwende folgenden Code:
Sub SaveAs()
x = ThisWorkbook.Path & "\"
ActiveWorkbook.SaveAs Filename:=(x) & "_Book1.xls"
End Sub
Wie füge ich da jetzt das Datum ein?
Tausend Dank, cheers Hägar