Ich hätte wieder eine Frage:
Wir erstellen wöchentlich eine Datei - diese wird abgespeichert: Dateiname KW37 19.09.2013.xlsm
Aus dieser Datei werden jeweils drei Reiter in eine neue Datei kopiert (derzeit manuell) und diese Datei wird dann wiederum abgespeichert unter Dateiname KW37 19.09.2013.xlsx
Mein Versuch dies zu lösen:
Sub Makro1()
' Makro1 Makro
Sheets("Bestellungen Technik").Select
Sheets("Bestellungen Technik").Copy
Windows("offene Bestellungen KW 37_2013 19.09.2013 - NEU.xlsm").Activate
Sheets("Bestellungen KW Technik").Select
Sheets("Bestellungen KW Technik").Copy Before:=Workbooks("Mappe1").Sheets(1)
Workbooks("Mappe1").SaveAs ([Bestellungen KW 37_2013 19.09.2013.xlsx]
End Sub
Leider gibt es Probleme; da die Basisdatei ja jede Woche anders heißt und auch die neu abgespeicherte Mappe immer das aktuelle Datum beinhalten soll.
Hat dazu vielleicht jemand eine Idee?
Danke schon mal im Voraus.