Hoe werkbladen maken en benoemen op basis van een lijst via een Excel-macro
Deze zelfstudie laat u zien hoe u werkbladen maakt en een naam geeft met behulp van een bestaande lijst via een macro .
Maak werkbladen met behulp van een lijst via een Excel-macro
Deze code kan u helpen automatisch werkbladen te maken en hernoemen, op basis van een lijst die bestaat in een ander blad:Sub CreateSheetsFromAList ()Dim MyCell As Range, MyRange As Range
MyRange = Sheets instellen ("Samenvatting"). Bereik ("A10")
MyRange = Range instellen (MyRange, MyRange.End (xlDown))
Voor elke MyCell In MyRange
Sheets.Add After: = Sheets (Sheets.Count) 'maakt een nieuw werkblad
Spreadsheets (Sheets.Count) .Name = MyCell.Value 'hernoemt het nieuwe werkblad
Volgende MyCell
End Sub
Afbeelding: © Microsoft.