Sådan opretter du projektmapper, som du vil
Vil du gerne sikre, at du opretter en hel række tomme regneark i dit bord og omdøber dem alle efter dine ønsker?
Det tager meget tid, hvis du gør det manuelt. Den manuelle omdøbning af tabellerne er særlig tidskrævende.
Det er lettere med en makro. Indtast tabelnavnene i et område i en tabel. Følgende illustration viser, hvordan dette kan se ud:
Ring derefter til følgende makro for at oprette tabellerne:
Sub FuegeBlaetterMithNamenEin ()
Dim område som streng
Dim celle som rækkevidde
Dim tabel som regneark
Område = "a1: a24"
Med ActiveWorkbook
For hver celle i ActiveSheet.Range .Celler
Sæt tabel = .Sheets.Add (Efter: =. Sheets (Sheets.Count))
Table.Name = Cell.Text
Næste celle
Afslut med
Afslut Sub
Sæt med variablen areal bestemmer fra hvilket område af din tabel navnene på regnearkene er taget.
Følgende figur viser en projektmappe, hvor tabelnavnene for 2010 og 2011 blev oprettet:
Tip: Hvis du gerne vil vide, hvordan du indtaster og starter makroer i Excel, finder du en kort beskrivelse her: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
