Cum să împărțiți datele în mai multe foi de lucru după numărul de rânduri în Excel?
De exemplu, am o gamă de liste de date, acum vreau să o împart în mai multe foi de lucru după număr de rânduri, în acest exemplu, o voi împărți la fiecare 5 rânduri (vezi următoarele capturi de ecran). Există vreo modalitate de a ne ajuta să rezolvăm această problemă rapid? Aici voi introduce două trucuri pentru ca tu să o faci cu ușurință.
 |
 |
 |
 |
||
 |
||
 |
Împărțiți datele în mai multe foi de lucru pe rânduri, cu numărul VBA
Împărțiți datele în mai multe foi de lucru pe rânduri, cu Kutools pentru Excel
- Reutilizați orice: Adăugați cele mai utilizate sau complexe formule, diagrame și orice altceva la preferatele dvs. și reutilizați-le rapid în viitor.
- Peste 20 de caracteristici text: Extrageți numărul din șirul de text; Extrageți sau eliminați o parte din texte; Conversia numerelor și valutelor în cuvinte în limba engleză.
- Instrumente de îmbinare: Mai multe cărți de lucru și foi într-unul; Combinați mai multe celule / rânduri / coloane fără a pierde date; Combinați rândurile duplicate și suma.
- Instrumente divizate: Împărțiți datele în mai multe foi bazate pe valoare; Un registru de lucru pentru mai multe fișiere Excel, PDF sau CSV; O coloană la mai multe coloane.
- Lipiți săriți Rânduri ascunse / filtrate; Număr și sumă de Culoarea fundalului; Trimiteți e-mailuri personalizate către mai mulți destinatari în bloc.
- Super Filtru: Creați scheme avansate de filtrare și aplicați oricăror foi; Sortează pe săptămână, zi, frecvență și multe altele; Filtru prin îndrăznețe, formule, comentarii ...
- Peste 300 de caracteristici puternice; Funcționează cu Office 2007-2021 și 365; Suporta toate limbile; Implementare ușoară în întreprinderea sau organizația dvs.
Împărțiți datele în mai multe foi de lucru pe rânduri, cu numărul VBA
Următorul cod VBA vă poate ajuta să împărțiți rândurile în mai multe foi de lucru după numărul de rânduri, procedați după cum urmează:
1. Țineți apăsat butonul ALT + F11 tasta pentru a deschide fișierul Microsoft Visual Basic pentru aplicații fereastră.
2. Clic Insera > Moduleși lipiți următorul cod în fereastra modulului.
VBA: Împărțiți datele în foi după număr de rânduri în Excel.
Sub SplitData()
'Updateby20140617
Dim WorkRng As Range
Dim xRow As Range
Dim SplitRow As Integer
Dim xWs As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
SplitRow = Application.InputBox("Split Row Num", xTitleId, 5, Type:=1)
Set xWs = WorkRng.Parent
Set xRow = WorkRng.Rows(1)
Application.ScreenUpdating = False
For i = 1 To WorkRng.Rows.Count Step SplitRow
resizeCount = SplitRow
If (WorkRng.Rows.Count - xRow.Row + 1) < SplitRow Then resizeCount = WorkRng.Rows.Count - xRow.Row + 1
xRow.Resize(resizeCount).Copy
Application.Worksheets.Add after:=Application.Worksheets(Application.Worksheets.Count)
Application.ActiveSheet.Range("A1").PasteSpecial
Set xRow = xRow.Offset(SplitRow)
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
3. Apoi apăsați F5 pentru a rula codul și apare o fereastră de dialog pentru selectarea unui interval de împărțit, apoi faceți clic pe OKși un alt dialog pentru a specifica numărul de rânduri. Vedeți captura de ecran:
 |
|
 |
4. Clic OK, iar intervalul este împărțit în mai multe foi prin numărul de rânduri.
notițe: Foile de lucru împărțite sunt plasate în partea din spate a foii de lucru master.
Împărțiți datele în mai multe foi de lucru pe rânduri, cu Kutools pentru Excel
Codul de mai sus poate împărți datele numai cu numărul de rânduri specificat și nu va adăuga titlul pentru fiecare foaie de lucru dacă datele dvs. au titlul.
Dar cu Kutools pentru Excel'S Împărțiți datele, nu numai că puteți insera anteturile pentru fiecare fișă de lucru, dar puteți specifica și noile nume ale foii de lucru.
Kutools pentru Excel include mai mult de 300 de instrumente Excel la îndemână. Încercare gratuită fără limitări în 30 de zile. Ia-l acum
Dacă ați instalat Kutools pentru Excel, faceți următoarele:
1. Selectați intervalul de date pe care doriți să îl împărțiți.
2. Clic Afacere > Instrumente pentru foaia de lucru > Împărțiți datele (Sau Afacere > Împărțiți datele ), vezi captura de ecran:
3. În Împărțiți datele în mai multe foi de lucru căsuță de dialog:
- Selectați Rânduri fixe din Split pe baza și introduceți numărul de rânduri pe care doriți să le împărțiți pentru fiecare fișă de lucru. (Dacă datele dvs. au anteturi și doriți să le inserați în fiecare nouă foaie de lucru divizată, verificați Datele mele au anteturi opțiune.)
- Apoi puteți specifica numele foilor de lucru împărțite, sub Numele noilor foi de lucru , selectați regulile de nume ale foii de lucru din Reguli lista derulantă, puteți adăuga fișierul Prefix or Sufix și pentru numele foilor. Vedeți captura de ecran:
4. După ce specificați setările, faceți clic pe OK, iar datele selectate au fost împărțite în mai multe foi de lucru ale unui nou registru de lucru la fiecare 5 rânduri. Și anteturile sunt inserate pentru fiecare foaie de lucru nouă. Vedeți captura de ecran:
Faceți clic pentru a afla mai multe despre această caracteristică Split Data.
Articol asociat:
Cum să împărțiți datele în mai multe foi de lucru pe baza coloanei din Excel?
Cele mai bune instrumente de productivitate Office
Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%
- reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
- Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
- Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
- Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
- Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
- Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
- Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
- Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
- Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
