Automatisch werkbladen maken met een macro

Inhoudsopgave

Zo maak je werkmappen zoals jij dat wilt

Wil je er zeker van zijn dat je een hele reeks lege werkbladen in je tabel aanmaakt en ze allemaal hernoemt naar jouw wensen?

Het kost veel tijd als je het handmatig doet. Vooral het handmatig hernoemen van de tabellen kost veel tijd.

Met een macro is het makkelijker. Voer de tabelnamen in een gebied in een tabel in. De volgende afbeelding laat zien hoe dit eruit kan zien:

Roep vervolgens de volgende macro aan om de tabellen te maken:

Sub FuegeBlaetterMithNamenEin ()
Dim gebied als string
Dim cel als bereik
Dim tafel als werkblad
Gebied = "a1: a24"
Met ActiveWorkbook
Voor elke cel in ActiveSheet.Range .Cells
Tabel instellen = .Sheets.Add (Na: =. Sheets (Sheets.Count))
Tabel.Naam = Cel.Tekst
Volgende cel
Eindigt met
Einde sub

Zet met de variabele Oppervlakte bepaalt uit welk gebied van uw tabel de namen voor de werkbladen worden genomen.

De volgende afbeelding toont een werkmap waarin de tabelnamen voor de maanden 2010 en 2011 zijn gemaakt:

Tip: Als u wilt weten hoe u macro's in Excel invoert en start, vindt u hier een korte beschrijving: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html

U zal helpen de ontwikkeling van de site, het delen van de pagina met je vrienden

wave wave wave wave wave