Excel-Arbeitsmappe anlegen und Tabellenblatt per Makro nach aktuellen Datum benennen
Sie möchten eine Arbeitsmappe per Makro anlegen, die genau ein Tabellenblatt enthält, das als Namen das aktuelle Datum trägt?
Ein solches Makro ist praktisch, wenn Sie beispielweise bestimmte Daten regelmäßig erfassen müssen und sich den Aufwand de Anlegens der Arbeitsmappe sparen möchten. Verwenden Sie das folgende Excel-Makro für diese Aufgabe:
Sub ErzeugeAktuelleDatumstabelle()
Application.DisplayAlerts = False
With Workbooks.Add
While .Worksheets.Count > 1
.Worksheets(1).Delete
Wend
.Worksheets(1).Name = Date
End With
Application.DisplayAlerts = True
End Sub
Nach dem Start erzeugt Excel eine neue, leere Arbeitsmappe. In dieser Mappe werden bis auf ein Tabellenblatt alle Blätter gelöscht. Anschließend gibt das Makro dem verbliebenen Tabellenblatt als Namen das aktuelle Datum.
Die folgende Abbildung zeigt, wie das Ergebnis aussehen kann:
Um das Makro einzugeben, drücken Sie in Excel die Tastenkombination ALT F11. Damit rufen Sie den VBA-Editor auf. Fügen Sie hier über das Kommando EINFÜGEN - MODUL ein leeres Modulblatt ein. Um das Makro zu starten, drücken Sie innerhalb von Excel die Tastenkombination ALT F8.