ich Arbeite aktuell an meiner ersten UserForm in Excel.
Hier habe ich aktuell ein Spinwheel welches in einer TextBox die Nummernwerte 0 - Unendlich ausgibt.
Anhand dieser Nummer würde ich gerne folgendes umsetzen:
Wert - 0 = Tabellenblatt "Projekt_1" Ausblenden
Wert - 1 = Tabellenblatt "Projekt_1" bleibt eingeblendet
Wert - 2 = Tabellenblatt "Projekt_1" Kopieren und dahinter setzen mit dem Namen "Projekt_2"
Wert - 3 = Tabellenblatt "Projekt_1" zwei mal Kopieren und dahinter setzen mit den Namen "Projekt_2" und "Projekt_3".
etc....
Dies soll passieren wenn ich den CommandButton Klicke.
Einfaches Kopieren bekomme ich schon hin aber leider nicht mit der Fortlaufen Nummerierung anhand und Menge anhand des Zahlenwertes aus der TextBox.
Sieht also aktuell so bei mir aus:
Private Sub Button_Anlegen_Click()
'Kopieren und erstellen der Tabellenblätter
Worksheets("Projekt_1").Copy after:=Worksheets("Projekt_2")
ActiveSheet.Name = "Kassenautomat " & Worksheets.Count - 2
End Sub
Hoffe dies ist nicht zu kompliziert und ich bekomme es auch umgesetzt, das wäre Super!Danke schonmal!