Preskoči na glavno vsebino

Kako razdeliti delovni zvezek za ločevanje Excelovih datotek v Excelu?

Morda boste morali razdeliti velik delovni zvezek, da boste ločili Excelove datoteke, pri čemer boste vsak delovni list delovnega zvezka shranili kot posamezno Excelovo datoteko. Delovni zvezek lahko na primer razdelite na več posameznih Excelovih datotek in nato vsako datoteko dostavite različni osebi, ki jo bo obdelala. S tem lahko dosežete, da določene osebe obdelujejo določene podatke in jih varujejo. Ta članek bo predstavil načine za razdelitev velikega delovnega zvezka za ločevanje Excelovih datotek na podlagi vsakega delovnega lista.

  1. Razdelite delovni zvezek, da ločite Excelove datoteke s kopiranjem in lepljenjem
  2. Razdelite delovni zvezek, da ločite Excelove datoteke s funkcijo Premikanje ali Kopiranje
  3. Razdelite delovni zvezek, da ločite Excelove datoteke s kodo VBA
  4. Z Kutools za Excel preprosto razdelite delovni zvezek za ločevanje datotek Excel / PDF / CSV / TXT

Razdelite delovni zvezek, da ločite Excelove datoteke s kopiranjem in lepljenjem

Običajno, z uporabo Kopiraj ukaz in testenine ukaz lahko ročno shrani delovni zvezek kot ločeno datoteko Excel. Najprej izberite celoten delovni list, ki ga želite shraniti kot ločeno datoteko, ustvarite nov delovni zvezek in ga nato prilepite v nov delovni zvezek, na koncu pa ga shranite.

To je enostaven način uporabe, če morate le nekaj delovnih listov razdeliti kot ločene datoteke. Vendar pa mora biti zamudno in dolgočasno razdeljevanje številnih delovnih listov z ročnim kopiranjem in lepljenjem.


Razdelite delovni zvezek, da ločite Excelove datoteke s funkcijo Premikanje ali Kopiranje

Ta metoda bo uvedla funkcijo Premakni ali Kopiraj, če želite izbrane liste premakniti ali kopirati v nov delovni zvezek in shraniti kot ločen delovni zvezek. Naredite naslednje:

1. V vrstici z zavihki List izberite liste, z desno miškino tipko kliknite in izberite Premakni ali Kopiraj iz kontekstnega menija. Oglejte si posnetek zaslona:

Opombe: Držati Ctrl tipko, lahko izberete več sosednjih listov, tako da jih kliknete enega za drugim v vrstici zavihkov List; držati Shift tipko, lahko izberete več sosednjih listov s klikom na prvega in zadnjega v vrstici z zavihki List.

2. V pogovornem oknu Premakni ali Kopiraj izberite (nova knjiga) Iz Rezervirati spustni seznam, preverite Ustvari kopijo in kliknite na OK . Oglejte si posnetek zaslona:

3. Zdaj se vsi izbrani listi kopirajo v nov delovni zvezek. Kliknite file > Shrani shranite nov delovni zvezek.

Hitro razdelite delovni zvezek, da v Excelu ločite datoteke Excel / PDF / TXT / CSV

Običajno lahko delovni zvezek razdelimo na posamezne Excelove datoteke z Premakni ali Kopiraj funkcija v Excelu. Toda Kutools za Excel Razdeljeni delovni zvezek pripomoček vam lahko pomaga enostavno razdeliti delovni zvezek in shraniti vsak delovni list kot ločeno datoteko PDF / TEXT / CSV ali delovni zvezek v Excelu.


ad split delovni zvezek

Kutools za Excel - Napolnite Excel z več kot 300 osnovnimi orodji. Uživajte v 30-dnevnem BREZPLAČNEM preskusu s polnimi funkcijami brez kreditne kartice! Get It Now

Razdelite delovni zvezek, da ločite Excelove datoteke s kodo VBA

Naslednja koda VBA vam lahko pomaga hitro razdeliti več delovnih listov trenutne delovne knjige v ločene Excelove datoteke, naredite naslednje:

1. Ustvarite novo mapo za delovni zvezek, ki ga želite razdeliti, ker bodo razdeljene Excelove datoteke ostale v isti mapi kot ta glavni delovni zvezek.

2. Držite tipko ALT + F11 tipke v Excelu in odpre Microsoft Visual Basic za aplikacije okno.

3. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v okno modula.

VBA: delovni zvezek razdelite na več delovnih zvezkov in shranite v isto mapo

Sub Splitbook()
'Updateby20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
    xWs.Copy
    Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx"
    Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Pritisnite F5 tipko za zagon te kode. Delovni zvezek je razdeljen na ločene Excelove datoteke v isti mapi z izvirnim delovnim zvezkom. Oglejte si posnetek zaslona:

Opombe: Če ima eden od listov isto ime kot delovni zvezek, ta VBA ne more delovati.

Z Kutools za Excel preprosto razdelite delovni zvezek za ločevanje datotek Excel / PDF / CSV / TXT

Če imate Kutools za Excel nameščen, njegov Razdeljeni delovni zvezek orodje lahko razdeli več delovnih listov kot ločene Excelove datoteke z le nekaj kliki.

Kutools za Excel - Napolnite Excel z več kot 300 osnovnimi orodji. Uživajte v 30-dnevnem BREZPLAČNEM preskusu s polnimi funkcijami brez kreditne kartice! Get It Now

1. Po namestitvi Kutools za Excel, Kliknite Kutools Plus > Razdeljeni delovni zvezek , glej posnetek zaslona:

2. v Razdeljeni delovni zvezek v pogovornem oknu izvedite naslednje postopke:
(1) Vsa imena delovnih listov so privzeto označena. Če ne želite razdeliti nekaterih delovnih listov, jih lahko počistite;
(2) Preverite Shranite vrsto možnost;
(3) Od Shrani kot vrsto v spustnem meniju izberite eno vrsto datoteke, ki jo želite razdeliti in shraniti.
(4) Nato kliknite Split gumb.

Opombe: Če se želite izogniti razdelitvi skritih ali praznih delovnih listov, lahko preverite Preskočite skrite delovne liste or Preskočite prazne delovne liste škatla.

3. V pogovornem oknu Brskaj za mapo določite ciljno mapo, da shranite ločene datoteke, in kliknite OK gumb.

Zdaj so preverjeni delovni listi shranjeni kot novi ločeni delovni zvezki. Vsak nov delovni zvezek je poimenovan z izvirnim imenom delovnega lista. Oglejte si posnetek zaslona:

Kutools za Excel's Razdeljeni delovni zvezek orodje omogoča enostavno razdelitev aktivnega delovnega zvezka na posamezne Excelove datoteke (ena datoteka vsebuje en delovni list), datoteke CSV, datoteke TXT ali datoteke PDF, kot jih potrebujete. Nastavite lahko preskakovanje vseh praznih in skritih delovnih listov. Brezplačno preskusite!


Predstavitev: Razdelite ali shranite vsak delovni list enega delovnega zvezka kot ločene datoteke excel / txt / csv / pdf


Kutools za Excel: Več kot 300 priročnih orodij na dosegu roke! Začnite 30-dnevno brezplačno preskusno obdobje brez omejitev funkcij še danes. Download Now!

Sorodni članki:

Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

zavihek kte 201905


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
Comments (113)
Rated 2.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Hello.
Both options work fine. But ..not satisfying my needs.
In each sheet i have 2 extra columns at and which contain vlookup formulas. And they all get exported to new files..
I cant have that.I also cant go and delete all formulas from all sheets then export , too much work.
Any solution to export but to ignore those columns with formulas?
Rated 2.5 out of 5
This comment was minimized by the moderator on the site
I tried this in Office 365 and it copies 8 sheets to separate files then gives me "run-time error '1004': Copy Method of Worksheet Class failed"
This comment was minimized by the moderator on the site
Hi there, did you use the vba code or Kutools?
This comment was minimized by the moderator on the site
I was able to use this macro once and it was great but now it will not work and I only get one file labeled as "Sheet 1" and it is blank, can anyone help?
This comment was minimized by the moderator on the site
Hello, how can we split the sheets tow by tow ==< what i mean is that i have an amount of sheets in one folder and I want tow split each tow successive sheets in one folder, i have tried to put changes on the basic code but i didn't succeed, I'm a beginner in this field if you can be held that is going to be a huge help
This comment was minimized by the moderator on the site
xWs.Copy
showing error in this area
This comment was minimized by the moderator on the site
Hello, I just tried the split data function based on the first column (about 90 partners). Half of the worksheets are named correctly while the other just have number of the sheet eventhough there is name of the partner in the column. Any help, please?
This comment was minimized by the moderator on the site
i have a data of 5 worksheets. Every worksheet has a common column (Branch). Can i convert the data into different excel files based on respective branches
This comment was minimized by the moderator on the site
Hi Sudarshan,
Kutools for Excel has an amazing feature – Split Data, which can quickly split data from a range or a sheet to multiple sheets based on values in the specified column. And these sheets are saved in a new workbook.

You can apply the Split Data feature to split each sheet based on the specified common column.
After splitting, you can apply the Combine Worksheets feature, also provided by Kutools for Excel, and combine all same name worksheets into one workbook.
This comment was minimized by the moderator on the site
excel which i want to split is having 3 spread sheet my requirement is to split the excel as per the sheet 1 and remaning to sheet to be contant when file split
This comment was minimized by the moderator on the site
Hi prateeksha,
In the fourth method on this webpage, the Split Workbook feature of Kutools for Excel is recommended, which will split every specified worksheet to individual PDF/CSV/TEXT/Workbooks.
This comment was minimized by the moderator on the site
Hey there,
I was wondering if we can use this macro to split the workbook into csv files
I've changed the VBA as below, replacing "xlsx" with "csv", but it doesn't work:
Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".csv"
Thanks for your help!
This comment was minimized by the moderator on the site
Hi Kevin,
It recommends trying the fourth method to solve your problem. Kutools for Excel can be freely trial for 30 days. And the Split Workbook feature of Kutools for Excel can solve the problem easily.
This comment was minimized by the moderator on the site
Very helpful code. Just had one question. How can I make these excel files read-only. I tried the below but it did not work.

Application.ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations