Du kan eksplodere Excel -regneark i separate arbejdsbøger ved hjælp af VBA (Visual Basic til applikationer) inden for Excel. Her er en trinvis vejledning:

1. Aktivér fanen Udvikler:

* Åbn din Excel -arbejdsbog.

* Gå til fil> Indstillinger> Tilpas bånd .

* Marker afkrydsningsfeltet for udvikler .

* Klik på OK .

2. Indsæt et VBA -modul:

* Klik på udvikler> Visual Basic .

* I Visual Basic Editor (VBE) skal du gå til indsæt> modul .

3. Indsæt og modificer VBA -koden:

`` VBA

Sub splitworksheets ()

Dim WB som arbejdsbog, WS som regneark

Dim Newwb som arbejdsbog

Dim filnavn som streng

Indstil WB =ActiveWorkbook 'Indstil den aktive arbejdsbog

'Loop gennem hvert regneark

For hver WS i WB.Worksheets

'Opret en ny arbejdsbog

Indstil newwb =workbøger.Addd

'Kopier det aktuelle regneark til den nye arbejdsbog

ws.copy før:=newwb.sheets (1)

'Omdøb den nye arbejdsbog baseret på regnearknavnet

filnavn =ws.name &".xlsx"

newwb.saveas filnavn

'Luk den nye arbejdsbog

newwb.close

Næste WS

Slut sub

`` `

Forklaring:

* `Dim WB som arbejdsbog, WS som regneark, Newwb som arbejdsbog, filnavn som streng`: Erklærer variabler for at gemme arbejdsbog og regnearkobjekter samt filnavnet til den nye arbejdsbog.

* `Set WB =ActiveWorkbook`: Indstiller variablen 'WB' til den aktuelt aktive arbejdsbog.

* `For hver WS i WB.Worksheets`: Loops gennem hvert regneark i den aktive arbejdsbog.

* `Set newwb =workbøger.Add`: Opretter en ny blank arbejdsbog.

* `ws.copy før:=newwb.sheets (1)`: Kopierer det aktuelle regneark (`ws`) til den nyoprettede arbejdsbog (` newwb`), indsætter det før det første ark.

* `filnavn =ws.name &" .xlsx "`: Indstiller filnavnet til den nye arbejdsbog ved hjælp af navnet på regnearket og `.xlsx` -udvidelsen.

* `newwb.saveas filnavn`: Gemmer den nye arbejdsbog med det specificerede filnavn.

* `newwb.close`: Lukker den nyoprettede arbejdsbog.

4. Kør makroen:

* Tryk på ALT + F11 At vende tilbage til Excel -ark.

* Gå til udvikler> makroer .

* Vælg splitworksheets makro og klik kør .

Makroen opretter separate Excel -arbejdsbøger til hvert regneark i din originale arbejdsbog, hvilket gemmer dem i den samme mappe som den originale arbejdsbog.

Yderligere noter:

* Tilpas filnavnformatet: Du kan ændre variablen 'Filnavn' til at inkludere yderligere oplysninger, såsom dato eller tid, i de gemte filnavne.

* Gem til en bestemt mappe: Du kan specificere en anden mappe for at gemme de nye arbejdsbøger ved at ændre variablen 'Filnavn'.

* Kør makroen på en anden arbejdsbog: Før du kører makroen, skal du sørge for at vælge den arbejdsbog, du vil opdele i separate filer.