ich würde gern ein Tabellenblatt duplizieren und nach einem gewissen Schema automatisch umbenennen.
Bisher habe ich folgendes:
Private Sub CommandButton1_Click()
Range("N26") = Range("N26") + 1
ActiveSheet.Copy After:=Sheets(ThisWorkbook.Sheets.Count)
ActiveSheet.Name = "KW" & Sheets("Tabelle1").Range("N26").Text & "_15"
End Sub
Bei N26 ist momentan die fortlaufende Nummer, allerdings soll sich das nicht auf Tabelle 1 beziehen, sondern auf das vorangegangene Tabellenblatt. Weiß da jemand etwas?