Kann ich anhand einer Zelle ein Tabellenblatt erstellen?
wenn ja z.B. von A2:A20 so dass für jede Zelle ein Tabellenblatt erstellt wird?
natürlich mit dem namen der in der Zelle ist.
Besten Dank & Gruss
Sub Blaetter()
Dim b As Byte, sh As Worksheet
For b = 2 To 20
On Error Resume Next
Set sh = Worksheets.Add
sh.Name = Sheets("Tabelle1").Cells(b, 1)
Next
Sheets("Tabelle1").Activate
End Sub
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