Skip i'r prif gynnwys

Sut i rannu llyfr gwaith i wahanu ffeiliau Excel yn Excel?

Efallai y bydd angen i chi rannu llyfr gwaith mawr i wahanu ffeiliau Excel gan arbed pob taflen waith o'r llyfr gwaith fel ffeil Excel unigol. Er enghraifft, gallwch rannu llyfr gwaith yn sawl ffeil Excel unigol ac yna danfon pob ffeil i wahanol berson i'w drin. Trwy wneud hynny, gallwch gael rhai pobl i drin data penodol, a chadw'ch data yn ddiogel. Bydd yr erthygl hon yn cyflwyno ffyrdd i rannu llyfr gwaith mawr i wahanu ffeiliau Excel yn seiliedig ar bob taflen waith.

  1. Rhannwch lyfr gwaith i wahanu ffeiliau Excel gyda chopïo a phastio
  2. Rhannwch lyfr gwaith i wahanu Ffeiliau Excel gyda nodwedd Symud neu Gopïo
  3. Rhannwch lyfr gwaith i wahanu ffeiliau Excel â chod VBA
  4. Rhannwch lyfr gwaith i wahanu ffeiliau Excel / PDF / CSV / TXT gyda Kutools ar gyfer Excel yn hawdd

Rhannwch lyfr gwaith i wahanu ffeiliau Excel gyda chopïo a phastio

Yn arferol, gan ddefnyddio copi gorchymyn a Gludo gall gorchymyn arbed llyfr gwaith fel ffeil Excel ar wahân â llaw. Yn gyntaf, dewiswch y daflen waith gyfan rydych chi am ei chadw fel ffeil ar wahân, creu llyfr gwaith newydd, ac yna ei gludo yn y llyfr gwaith newydd, ar y diwedd mae'n ei arbed.

Mae hon yn ffordd hawdd ei defnyddio os oes angen i chi rannu dim ond ychydig o daflenni gwaith fel ffeiliau ar wahân. Fodd bynnag, rhaid iddo gymryd llawer o amser a diflas i rannu llawer o daflenni gwaith â chopïo a gludo â llaw.


Rhannwch lyfr gwaith i wahanu Ffeiliau Excel gyda nodwedd Symud neu Gopïo

Bydd y dull hwn yn cyflwyno'r nodwedd Symud neu Gopïo i symud neu gopïo'r taflenni a ddewiswyd i lyfr gwaith newydd ac arbed fel llyfr gwaith ar wahân. Gwnewch fel a ganlyn:

1. Dewiswch y dalennau yn y bar tab Dalen, cliciwch ar y dde, a dewiswch Symud neu Gopïo o'r ddewislen cyd-destun. Gweler y screenshot:

Nodyn: Dal Ctrl allwedd, gallwch ddewis nifer o daflenni nad ydynt yn gyfagos trwy eu clicio fesul un yn y bar tab Dalen; daliad Symud allwedd, gallwch ddewis sawl dalen gyfagos gyda chlicio ar yr un gyntaf a'r un olaf yn y bar tab Dalen.

2. Yn y dialog Symud neu Gopïo, dewiswch (llyfr newydd) oddi wrth y I archebu rhestr ostwng, gwiriwch y Creu copi opsiwn, a chliciwch ar y OK botwm. Gweler y screenshot:

3. Nawr mae'r holl daflenni a ddewiswyd yn cael eu copïo i lyfr gwaith newydd. Cliciwch Ffeil > Save i achub y llyfr gwaith newydd.

Rhannwch lyfr gwaith yn gyflym i wahanu ffeiliau Excel / PDF / TXT / CSV yn Excel

Fel rheol gallwn rannu llyfr gwaith i ffeiliau Excel unigol gyda'r Symud neu Gopïo nodwedd yn Excel. Ond Kutools ar gyfer Excel's Llyfr Gwaith Hollti gall cyfleustodau eich helpu i rannu llyfr gwaith yn hawdd ac arbed pob taflen waith fel ffeil neu lyfr gwaith PDF / TEXT / CSV ar wahân yn Excel.


llyfr gwaith rhaniad ad yn rhagori

Kutools ar gyfer Excel - Supercharge Excel gyda dros 300 o offer hanfodol. Mwynhewch dreial 30 diwrnod llawn sylw AM DDIM heb fod angen cerdyn credyd! Get It Now

Rhannwch lyfr gwaith i wahanu ffeiliau Excel â chod VBA

Gall y cod VBA canlynol eich helpu i rannu nifer o daflenni gwaith o'r llyfr gwaith cyfredol yn gyflym i wahanu ffeiliau Excel, gwnewch fel a ganlyn:

1. Creu ffolder newydd ar gyfer y llyfr gwaith rydych chi am ei rannu, oherwydd bydd y ffeiliau Excel hollt yn cael eu aros yn yr un ffolder â'r prif lyfr gwaith hwn.

2. Daliwch i lawr y ALT + F11 allweddi yn Excel, ac mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.

VBA: Rhannwch lyfr gwaith yn nifer o lyfrau gwaith ac arbedwch yn yr un ffolder

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. Gwasgwch y F5 allwedd i redeg y cod hwn. Ac mae'r llyfr gwaith wedi'i rannu i wahanu ffeiliau Excel yn yr un ffolder â'r llyfr gwaith gwreiddiol. Gweler y screenshot:

Nodyn: Os oes gan un o'r taflenni yr un enw â'r llyfr gwaith, ni all y VBA hwn weithio.

Rhannwch lyfr gwaith i wahanu ffeiliau Excel / PDF / CSV / TXT gyda Kutools ar gyfer Excel yn hawdd

Os oes gennych Kutools ar gyfer Excel gosod, ei Llyfr Gwaith Hollti gall offeryn rannu taflenni gwaith lluosog fel ffeiliau Excel ar wahân yn gyfleus ac yn gyflym gyda dim ond ychydig o gliciau.

Kutools ar gyfer Excel - Supercharge Excel gyda dros 300 o offer hanfodol. Mwynhewch dreial 30 diwrnod llawn sylw AM DDIM heb fod angen cerdyn credyd! Get It Now

1. Ar ôl gosod Kutools ar gyfer Excel, Cliciwch Kutools Byd Gwaith > Llyfr Gwaith Hollti , gweler y screenshot:

2. Yn y Llyfr Gwaith Hollti blwch deialog, gwnewch y gweithrediadau canlynol:
(1) Mae holl enwau'r daflen waith yn cael eu gwirio yn ddiofyn. Os nad ydych chi eisiau rhannu rhai o'r taflenni gwaith, gallwch eu dad-dicio;
(2) Gwiriwch y Arbedwch fath opsiwn;
(3) O'r Cadw fel math gwympo, dewiswch un math o ffeil rydych chi am ei rhannu a'i chadw.
(4) Yna cliciwch Hollti botwm.

Nodyn: Os ydych chi am osgoi rhannu'r taflenni gwaith cudd neu wag, gallwch wirio'r Hepgor taflenni gwaith cudd or Hepgor taflenni gwaith gwag blwch.

3. Yn y dialog Pori Am Ffolder, nodwch ffolder cyrchfan i gadw'r ffeiliau ar wahân wedi'u rhannu, a chliciwch ar y OK botwm.

Nawr mae'r taflenni gwaith sydd wedi'u gwirio yn cael eu cadw fel llyfrau gwaith newydd sydd wedi'u gwahanu. Enwir pob llyfr gwaith newydd gydag enw'r daflen waith wreiddiol. Gweler y screenshot:

Kutools ar gyfer Excel's Llyfr Gwaith Hollti offeryn yn ei gwneud hi'n hawdd rhannu llyfr gwaith gweithredol yn ffeiliau Excel unigol (mae un ffeil yn cynnwys un daflen waith), ffeiliau CSV, ffeiliau TXT, neu ffeiliau PDF yn ôl yr angen. Gallwch chi osod i hepgor yr holl daflenni gwaith gwag a chudd. Cael Treial Am Ddim!


Demo: Rhannwch neu arbedwch bob taflen waith o un llyfr gwaith fel ffeiliau excel / txt / csv / pdf ar wahân


Kutools ar gyfer Excel: Dros 300 o offer defnyddiol ar flaenau eich bysedd! Dechreuwch eich treial am ddim 30 diwrnod heb unrhyw gyfyngiadau nodwedd heddiw. Lawrlwytho Nawr!

Erthyglau cysylltiedig:

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...

Disgrifiad


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
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