Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com es pot dividir les dades en múltiples fulls de càlcul de files en Excel?

Per exemple, tinc un rang de llista de dades, ara vull dividir-lo en múltiples fulls de càlcul de files, en aquest exemple, ho dividiré per totes les files de 5 (veure les següents captures de pantalla). Hi ha alguna manera d'ajudar-nos a resoldre aquest problema ràpidament? Aquí us presentaré dos trucs per fer-ho fàcilment.


doc-split-data per files1


-2



doc-split-data per files2
doc-split-data per files3
doc-split-data per files4
doc-split-data per files5

Dividir dades en múltiples fulls de treball per files compta amb codi VBA

Dividir dades en múltiples fulls de treball per files contar amb Kutools per a Excel


fletxa blau dreta bombolla Dividir dades en múltiples fulls de treball per files compta amb codi VBA


El següent codi de VBA us pot ajudar a dividir les files en múltiples fulls de càlcul pel recompte de files, feu el següent:

1. Mantingueu premut el botó ALT + F11 clau per obrir el Microsoft Visual Basic per a aplicacions finestra.

2. Clic Insereix > Mòduls, i enganxeu el següent codi a la finestra del mòdul.

VBA: dividiu les dades en fulls per recompte de files en 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. A continuació, premeu F5 tecla per executar el codi i apareix un quadre de diàleg per seleccionar un interval per dividir-lo i, a continuació, feu clic a OK, i un altre quadre de diàleg per especificar el recompte de files. Mostra la captura de pantalla:

4. feu clic OK, i el rang es divideix en diversos fulls pel recompte de files.

Nota: Els fulls de treball dividits es col·loquen a la part posterior del full de treball mestre.


fletxa blau dreta bombolla Dividir dades en múltiples fulls de treball per files contar amb Kutools per a Excel

El codi anterior només pot dividir les dades pel recompte de files especificat, i no afegirà el títol de cada fitxa de full de càlcul si les seves dades tenen el títol.

Però amb Kutools for Excel'S Dividir dades, no només podeu inserir els encapçalaments per a cada informació del full de càlcul, sinó també especificar els nous noms de full de treball dividits.

Kutools for Excel Inclou més eines 300 pràctiques d'Excel. Lliure de provar sense límit en 30 dies. Agafa-ho ara

Si heu instal·lat Kutools for Excel, feu el següent:

1. Seleccioneu l'interval de dades que vulgueu dividir.

2. Clic empresa > Eines de full de treball > Dividir dades (o empresa > Dividir dades ), veure captura de pantalla:

doc-split-data per files6

3. Al Divideix les dades en diversos fulls de treball Caixa de diàleg:

  • seleccionar S'han solucionat les files de Dividit basat en opció i introduïu el nombre de files que voleu dividir per a cada full de càlcul. (Si les vostres dades tenen capçaleres i voleu inserir-les en cada full de càlcul dividit, consulteu Les meves dades tenen capçaleres opció).
  • A continuació, podeu especificar els noms del full de càlcul dividit, sota la secció Nous fulls de fulls de càlcul , seleccioneu les regles dels noms de full de càlcul de la secció Regles llista desplegable, podeu afegir la llista desplegable Prefix or sufix per als noms de fulls també. Mostra la captura de pantalla:

doc-split-data per files7

4. Després d'especificar la configuració, feu clic a OK, i les dades seleccionades s'han dividit en diverses fulles d'un llibre nou per cada una de les files de 5. I els encapçalaments s'insereixen per a cada full de treball nou. Mostra la captura de pantalla:

doc-split-data per files8

Feu clic per obtenir més informació sobre aquesta funció de dades dividides.

Article relacionat:

Com dividir les dades en múltiples fulls de treball sobre la base de la columna d'Excel?



Eines de productivitat recomanades

Pestanya d'Office

estrella d&#39;or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d&#39;or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d&#39;or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Max · 9 months ago
    Omg thank you so very much dude!
  • To post as a guest, your comment is unpublished.
    prasanna · 1 years ago
    Hi Thanks for this great code, but the concern is, here we can only split fixed number of rows, can you help me with split is based on some name or code, because i have different set of rows for each worksheet.
  • To post as a guest, your comment is unpublished.
    aparna · 2 years ago
    hi this works great but want the output as string how can i modify the code or i can say example : 'output',
  • To post as a guest, your comment is unpublished.
    Ralph · 2 years ago
    Thanks a lot for the fantastic VBA-Script. But how to modify it to keep the header row on every split?
  • To post as a guest, your comment is unpublished.
    Ralph · 2 years ago
    Thanks, for this fantastic VBA-Script. But how to configure it to repeat the header row on every split?