ich habe in Excel ein Tabellenblatt, dass ioch ca. 90 weitere Tabellenblätter hinzufügen möchte. Geht dass nur über Einfügen, Tabellenblatt oder geht dass bei ca 90 Stück auch einfacher ?
Vielen Dank für Eure Hilfe
Gruß
Micha
Sub Tabellen_dazu()
Dim i, x
i = Application.InputBox("Wieviele Tabellen?")
For x = 1 To i
Sheets.Add
Next x
End Sub