gibt es eine Möglichkeit anhand einer Namensliste automatisch
für jeden Namen ein eigenes Tabellenblatt zu erstellen.
Für Eure Hilfe im voraus schon mal besten Dank.
Für Eure Hilfe im voraus schon mal besten Dank.
Gruß
Gerold D
siehe :
hallo gerold,
angenommen in deiner ersten Tabelle beginnend in a1 steht die liste dann
Sub tabneu()
Dim i, z As Double
ActiveSheet.Range("A:A").End(xlDown).Offset(1, 0).Select
z = ActiveCell.Row
z = z - 1
For i = 1 To z
Sheets(2).Select
Sheets.Add
ActiveSheet.Name = Sheets(1).Cells(z, 1).Value
z = z - 1
Next i
End Sub
gruß
andreas e
http://www.skripteundaufgaben.de viele kostenlose Downloads und Lösungsansätze zu EXCEL und mehr
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen