Thema: 40 neue Arbeitsblätter hinzufügen

Download Beispiel-Arbeitsmappe

Home

Gruppe

Allgemein

Problem

Wie kann ich der aktiven Arbeitsmappe 40 neue Arbeitsblätter hinzufügen und diese von 1 bis 40 benennen?

Lösung

Nachfolgendes Makro bei XL5/7 in ein englischsprachiges, bei XL8 ein allgemeines Modul einfügen und starten.

StandardModule: basMain

Sub NeueTabellen()
   Dim iCounter As Integer
   For iCounter = 1 To 40
       Worksheets.Add.Move after:=Worksheets(Worksheets.Count)
       ActiveSheet.Name = "Tab" & iCounter
    Next iCounter
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Arbeitsblatt

Excel Arbeitsblatt verkleinern/vergrößern	Arbeitsblatt schützen Kommentare aber noch möglich
Arbeitsblatt speichern	Arbeitsblatt als E-Mail versenden
Arbeitsblattname in Zelle anzeigen	Arbeitsblatt in neuer Arbeitsmappe speichern
Einfügen v. Werten in ein anderes Arbeitsblatt	Namen von Arbeitsblatt in Zelle übernehmen
Arbeitsblatt schützen	Allgemeine Frage zur Fehlerbehandlung
allgemeine Fragen zu einer Datenbank	Dateneingabe u. Arbeitsblatt kopieren
Hyperlink auf Bereich in Arbeitsblatt	Ereignis Arbeitsblatt sperren abfangen
Zugriff auf ein Arbeitsblatt per Kennwort	VBA-Code von einem Arbeitsblatt ins nächste ausfüh
Arbeitsblatt ohne Select speichern	wenn arbeitsblatt vorhanden makro ausführen
wenn arbeitsblatt vorhanden makro ausführen	"Seite einrichten" eines Arbeitsblattes übern
Scrollen im Arbeitsblatt bei Formelbearbeitung	allgemein
Neue Daten in ein anderes Arbeitsblatt übertragen	Arbeitsblatt als rtf-Datei abspeichern - Wie?
Daten aus anderem Arbeitsblatt suchen und einfügen	bestehendes Problem Arbeitsblatt erstellen
Arbeitsblattname in ein Feld schreiben	Arbeitsblattwechsel durch Formular unterbinden
Neues Arbeitsblatt erstellen, falls nicht vorhande	Arbeitsmappe öffnen, Arbeitsblatt suchen, Text ein
Ansicht nach Arbeitsblatt wechsel	Combobox abhängig von offenem Arbeitsblatt
combobox rowsource aus anderem arbeitsblatt	Automatisches Speichern einer Arbeitsblatt-Kopie
Checkbox in Arbeitsblatt	Zellen in neues Arbeitsblatt kopieren
allgemein: VBA lernen?	Indirekt - Funktion für anderes Arbeitsblatt
Hide-Methode-Allgemeine Frage	Übergabe eines Arbeitsblattes VBA
Arbeitsblattliste-Hyperlinks erstellen-Formatieren	Formelassistent allgemein
Arbeitsblatt-Menüleiste ausgeblendet	Macro nur auf jeweiligem Arbeitsblatt
Archivieren externer Dateien in Arbeitsblatt	allgemeingültig Blattschutz aufheben
Arbeitsblatt	activesheet.name im arbeitsblatt
Arbeitsblatt kopieren mit Namensbezügen