Brug en VBA -makro til at oprette en ny projektmappe, der indeholder præcis så mange regneark, som du har brug for
I mange makroer skal der oprettes nye projektmapper, som f.eks. Er fyldt med bestemt indhold. En vigtig opgave her er at oprette en ny Excel -projektmappe, der indeholder præcis det antal regneark, du ønsker.
Følgende makro udfører dette job. Det opretter en ny projektmappe, der indeholder 31 regneark. Disse regneark er nummereret fra 1 til 31. Her er de relevante VBA -kommandoer:
Sub FuegeTabellenEin ()
Dim nummer som heltal
Dim i As Integer
Dim Mappe Som arbejdsbog
Number = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 31
Angiv mappe = Workbooks.Add
For i = 1 Til Mappe.Worksheets.Count
Folder.Worksheets (i) .Name = i
Næste i
Application.SheetsInNewWorkbook = nummer
Afslut Sub
Når den starter, viser Excel en ny projektmappe, der indeholder 31 regneark. Følgende figur viser, hvordan dette ser ud i arkregistret:
I makroen angiver du det antal regneark, du ønsker, ved hjælp af tallet 31. Skift dette nummer, hvis du vil have færre eller flere regneark i en projektmappe.
For at komme ind i makroen skal du trykke på ALT F11 i Excel for at åbne VBA -editoren. Brug kommandoen INSERT - MODULE til at indsætte et tomt modulark. For at starte makroen direkte fra Excel skal du bruge tastekombinationen ALT F8.
