Erstellen und Benennen von Arbeitsblättern anhand einer Liste über ein Excel-Makro
In diesem Tutorial erfahren Sie, wie Sie Arbeitsblätter mithilfe einer vorhandenen Liste über ein Makro erstellen und benennen .
Erstellen Sie Arbeitsblätter mithilfe einer Liste über ein Excel-Makro
Dieser Code kann Ihnen helfen, Arbeitsblätter basierend auf einer Liste, die in einem anderen Blatt vorhanden ist, automatisch zu erstellen und umzubenennen:Sub CreateSheetsFromAList ()Dim MyCell As Range, MyRange As Range
Set MyRange = Sheets ("Zusammenfassung"). Range ("A10")
Set MyRange = Range (MyRange, MyRange.End (xlDown))
Für jede MyCell in MyRange
Sheets.Add After: = Sheets (Sheets.Count) 'erstellt ein neues Arbeitsblatt
Sheets (Sheets.Count) .Name = MyCell.Value 'benennt das neue Arbeitsblatt um
Nächstes MyCell
End Sub
Bild: © Microsoft.