Thema: Tabellen hinzufügen und mit Namen aus einer Liste belegen

Download Beispiel-Arbeitsmappe

Home

Gruppe

Allgemein

Problem

Wie kann ich Tabellenblätter hinzufügen und sie mit den in Spalte A stehenden Namen belegen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub TabNamenFestlegen()
   Dim wks As Worksheet
   Dim iRow As Integer
   Set wks = ActiveSheet
   iRow = 1
   Do Until IsEmpty(wks.Cells(iRow, 1))
      Worksheets.Add after:=Worksheets(Worksheets.Count)
      ActiveSheet.Name = wks.Cells(iRow, 1).Value
      iRow = iRow + 1
   Loop
   Worksheets(1).Select
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