Sådan indsættes tabeller for de næste x dage
Har du brug for regneark med navne, der har en dato? Dette er f.eks. Nyttigt, hvis du registrerer data til dagen og bruger et separat regneark til hver post.
Hvis du vil spare dig selv besværet med selv at oprette regnearkene og tilføje de ønskede datoværdier, kan en makro hjælpe dig. Følgende makro definerer et antal regneark, der følger den aktuelle dato baseret på den aktuelle dato:
Sub FuegeTabellenEin ()
Dim nummer som heltal
Dim i As Integer
Number = InputBox ("Hvor mange ark skal indsættes?")
For i = 1 Til nummer
Arbejdsark.Tilføj efter: = Regneark (Arbejdsark.Tælling)
Regneark (regneark.Count) .Name = Dato + i
Næste i
Afslut Sub
Når du har startet makroen, viser Excel dig et inputvindue. I dette vindue kan du indtaste antallet af regneark, du vil oprette. Følgende illustration viser, hvordan dette vindue ser ud:
Indtast det antal regneark, du ønsker her. Fra og med den aktuelle dato opretter Excel derefter det ønskede antal regneark og giver dem den aktuelle dato, datoen for den følgende dag og så videre. Følgende figur viser, hvordan resultatet kan se ud:
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
