Definer antallet af regneark i en Excel -projektmappe

Sådan defineres antallet af Excel -ark ved hjælp af en makro

Mange makroer er lavet til automatisk at oprette projektmapper. Disse mapper skulle da normalt også have et bestemt antal regneark.

Brug følgende kommando til at styre det ønskede antal ark via en makro:

Definer undernummer for ark ()
Application.SheetsInNewWorkbook = 5
Afslut Sub

Brug tallet efter lighedstegnet til at bestemme, hvor mange regneark der skal være i din projektmappe. Denne værdi er identisk med det tal, som brugeren kan indstille via menuen "Værktøjer - Indstillinger - Generelt" i feltet "Ark i projektmappen", som det kan ses i følgende figur:

Selvfølgelig kan du også læse værdien op. Dette er nyttigt, hvis du kun vil ændre antallet af regneark kort for derefter at oprette en mappe med præcis dette antal regneark. Følgende program viser, hvordan du gør dette:

1. Det gemmer det aktuelt forudindstillede antal ark i en variabel.
2. Det indstiller værdien til tallet 7.
3. Det opretter en ny projektmappe (som derefter indeholder syv ark).
4. Det nulstiller det forudindstillede antal tabeller til den tidligere gemte værdi.

Her er den relevante programoversigt til denne opgave:

SubtabelnummerMark ()
Dim nummer som heltal
Number = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 7
Workbooks.Add
Application.SheetsInNewWorkbook = nummer
Afslut Sub