ich habe folgendes Makro
Sub Makro2()
ActiveWorkbook.SaveAs Filename:= _
"C:\Zielordner\Test1 " & Str(Date) + " " + Mid(Time, 1, 2) + "_" + Mid(Time, 4, 2) + "_" + Mid(Time, 7, 2) & ".xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub
Hiermit wird die Datei Test1 auf C:\Zielordner\mit Dateinamen Test1 mit Datum und Uhrzeit gespeichert. Da dieses Makro 2 mal pro Tag läuft, werden sehr viele Dateien in einen Ordner entstehen, und ich müsste alle 30 Tage das Makro neu schreiben, um einen Überblick zu erhealten.
Ich möchte gern erreichen, dass im Zielordner bei der Makroausführung ein Ordner für das Kalenderjahr und darin ein Ordner für den entsprechenden Monat des Jahres erstellt wird zu der Zeit, wo das Makro läuft und dann die Datei Test1 in dem entsprechenden Ordner speichert.
Ich hoffe mir kann jemand helfen, das Makro umzuschreiben
Danke im voraus
MFG
Andre