Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1536to1540
1536to1540
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabelle erzeugen

Forumthread: Tabelle erzeugen

Tabelle erzeugen
03.02.2017 13:15:34
Walter
Hallo Excelfreunde,
Ich habe eiene Tabelle mit 18 Eintragungen,
Für jede Eintragung möchte ich ein Blatt erzeugen, bekomme aber immer
eine Fehlermeldung.
Bitter um Hilfe
https://www.herber.de/bbs/user/111146.xlsm
Gruß Walter
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle erzeugen - Gruß
03.02.2017 13:29:39
robert 

Sub tabneu()
Dim i, z As Long
z = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To z
Sheets.Add
ActiveSheet.Name = Tabelle1.Cells(z, 1).Value
z = z - 1
Next i
End Sub

AW: Tabelle erzeugen - Danke
03.02.2017 13:44:49
Walter
Herzlichen Dank,
geht wie geschmiert
Gruß
vom
Rentner Walter

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige