Hur man definierar antalet Excel -ark med hjälp av ett makro
Många makron görs för att automatiskt skapa arbetsböcker. Dessa mappar bör då vanligtvis också ha ett visst antal kalkylblad.
Använd följande kommando för att styra önskat antal ark via ett makro:
Definiera delantal ark ()
Application.SheetsInNewWorkbook = 5
Avsluta Sub
Använd talet efter likhetstecknet för att avgöra hur många kalkylblad som ska finnas i din arbetsbok. Det här värdet är identiskt med det nummer som användaren kan ställa in via menyn "Verktyg - Alternativ - Allmänt" i fältet "Arbetsblad", som kan ses i följande bild:
Naturligtvis kan du också läsa upp värdet. Detta är användbart om du bara vill ändra antalet kalkylblad för att sedan skapa en mapp med exakt detta antal kalkylblad. Följande program visar hur du gör detta:
- Det sparar det för närvarande förinställda antalet ark i en variabel.
- Det anger värdet till siffran 7.
- Det skapar en ny arbetsbok (som sedan innehåller sju blad).
- Det återställer det förinställda antalet tabeller till det tidigare sparade värdet.
Här är lämplig programlista för denna uppgif.webpt:
SubtabellnummerMark ()
Dim nummer Som heltal
Number = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 7
Arbetsböcker.Lägg till
Application.SheetsInNewWorkbook = nummer
Avsluta Sub
