folgender Code habe ich aus dem Forum.
Wie kann ich verhindern das dieser Monat zweimal angelegt wird.
Private Sub CommandButton1_Click()
Sheets("Hauptzähler").Select
Sheets("Hauptzähler").Copy Before:=Sheets(1)
Sheets("Hauptzähler (2)").Select
ActiveSheet.Name = Format(DateSerial(Year(Date), _
Month(Date) - 2, 1), "MMMM YYYY")
MsgBox ("Monat erfolgreich erstellt")
End Sub
Könnte mir bitte jemand behilflich sein
Gruss
Rudi