Hvordan oprettes en ny projektmappe med et specifikt antal regneark?
Når du opretter en ny projektmappe, inkluderer den normalt tre regneark i Excel 2007/2010 eller et ark i Excel 2013 som standard. Senere kan du tilføje eller slette fanerne efter dit behov. Men har du nogensinde prøvet at oprette en ny projektmappe med et specifikt antal regneark hver gang du har brug for det?
Opret ny projektmappe med et specifikt antal regneark ved hjælp af VBA-kode
Opret ny projektmappe med specifikt antal regneark ved hjælp af Kutools til Excel
Opret ny projektmappe med et specifikt antal regneark ved hjælp af VBA-kode
Du kan bruge følgende VBA-kode til at oprette en ny projektmappe, der indeholder et bestemt antal faner.
1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. Klik indsatte > Moduler, og indsæt følgende kode i Moduler Vindue.
VBA-kode: Opret ny projektmappe med et specifikt antal regneark
Sub MakeWorkbook()
'update Extendoffice
Dim xOldCount As Integer
Dim xNewCount As Variant
xOldCount = Application.SheetsInNewWorkbook
xNewCount = Application.InputBox("How many sheets in the new workbook do you want?", "Kutools for Excel", , , , , , 1)
If xNewCount = False Then Exit Sub
If (xNewCount < 1) Or (CLng(xNewCount) > 255) Then
MsgBox "The number must between 1 and 255!"
Exit Sub
End If
With Application
.SheetsInNewWorkbook = xNewCount
.Workbooks.Add
.SheetsInNewWorkbook = xNewCount
End With
End Sub
3. Når du har indsat koden, skal du trykke på F5 nøgle til at køre denne kode, og indtast det antal ark, du vil have i projektmappen, i promptboksen, se skærmbillede:
4. Klik derefter på OK knappen, er den nye projektmappe oprettet med det angivne antal ark, du har brug for.
Opret ny projektmappe med specifikt antal regneark ved hjælp af Kutools til Excel
Hvis du ikke er bekendt med VBA-koden, kan du anvende et praktisk værktøj - Kutools til Excel, Med Opret sekvensark værktøj, kan du hurtigt oprette en ny projektmappe med standardarknavne, brugerdefinerede arknavne og så videre.
Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. |
Efter installation Kutools til Excelskal du gøre som følger:
1. Klik Enterprise > Arbejdsark > Opret sekvens regneark, se skærmbillede:
2. I Opret sekvensark i dialogboksen, skal du udføre følgende handlinger:
(1.) Vælg Tomt regneark under Basis regneark rulleliste
(2.) Indtast antallet af ark i den nye projektmappe under Antallet af Opret tekstboks;
(3.) Fra Arknavne baseret på sektion, vælg Excel-standardnavn valgmulighed.
3. Klik derefter på OK knappen, og den nye projektmappe oprettes med dit specifikke antal regneark.
Klik for at vide mere om dette værktøj til oprettelse af sekvensark ...
Gratis download Kutools til Excel nu
Relaterede artikler:
Hvordan oprettes sekvensregneark fra en række celler i Excel?
Hvordan tilføjes nyt regneark med den aktuelle dato i Excel?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!