Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Über Schaltfläche neues Blatt mit aktuellem Datum einfügen

Gruppe

Arbeitsblatt

Problem

Wie kann ich über eine Schaltfläche ein neues Arbeitsblatt mit dem aktuellen Datum als Blattnamen einfügen?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub NeuesBlattErstellen()
   Worksheets.Add after:=Worksheets(Worksheets.Count)
   ActiveSheet.Name = Format(Date, "yyddmm")
End Sub