Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo se dividen los datos en varias hojas de cálculo por filas en Excel?

Por ejemplo, tengo un rango de lista de datos, ahora quiero dividirlo en varias hojas de cálculo por conteo de filas, en este ejemplo, lo dividiré por cada línea 5 (consulte las siguientes capturas de pantalla). ¿Hay alguna forma de ayudarnos a resolver este problema rápidamente? Aquí presentaré dos trucos para que lo hagas fácilmente.


doc-split-data-by-rows1


-2



doc-split-data-by-rows2
doc-split-data-by-rows3
doc-split-data-by-rows4
doc-split-data-by-rows5

Dividir datos en varias hojas de cálculo por filas cuentan con código VBA

Dividir datos en varias hojas de cálculo por filas cuenta con Kutools para Excel


flecha azul burbuja derecha Dividir datos en varias hojas de cálculo por filas cuentan con código VBA


El siguiente código de VBA puede ayudarlo a dividir las filas en varias hojas de cálculo por conteo de filas, haga lo siguiente:

1. Mantenga presionado el ALT + F11 clave para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en la Ventana del Módulo.

VBA: dividir datos en hojas por filas cuenta 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. Entonces presione F5 tecla para ejecutar el código, y aparece un cuadro de diálogo para seleccionar un rango para dividir, y luego hacer clic OKy otro cuadro de diálogo para que especifique el recuento de filas. Ver captura de pantalla:

4. Haz click OK, y el rango se divide en varias hojas por el recuento de filas.

notas: Las hojas de trabajo divididas se colocan en la parte posterior de la hoja de trabajo maestra.


flecha azul burbuja derecha Dividir datos en varias hojas de cálculo por filas cuenta con Kutools para Excel

El código anterior solo puede dividir los datos por el recuento de filas especificado, y no agregará el título para cada dato de la hoja de trabajo si sus datos tienen el título.

Pero con Kutools for Excel, Dividir datos, no solo puede insertar los encabezados para cada información de la hoja de cálculo, sino también puede especificar los nuevos nombres de la hoja de trabajo dividida.

Kutools for Excel incluye más de las útiles herramientas de Excel de 300. Gratis para probar sin limitaciones en los días 30. Get it Now

Si ha instalado Kutools para Excel, haga lo siguiente:

1. Seleccione el rango de datos que desea dividir.

2. Hacer clic Empresa > Herramientas de hoja de trabajo > Dividir datos (o Empresa > Dividir datos ), ver captura de pantalla:

doc-split-data-by-rows6

3. En la Divida los datos en varias hojas de trabajo caja de diálogo:

  • Seleccionar Filas fijas desde Split basado en opción, e ingrese el número de filas que desea dividir para cada hoja de cálculo. (Si sus datos tienen encabezados y desea insertarlos en cada nueva hoja de trabajo dividida, compruebe Mis datos tienen encabezados opción.)
  • Luego puede especificar los nombres de la hoja de trabajo dividida, debajo del Nuevo nombre de hoja de cálculo sección, seleccione las reglas de nombre de la hoja de cálculo Reglas lista desplegable, puede agregar Prefijo or Sufijo para los nombres de las hojas también. Ver captura de pantalla:

doc-split-data-by-rows7

4. Después de especificar la configuración, haga clic OK, y los datos seleccionados se han dividido en varias hojas de trabajo de un nuevo libro de trabajo por cada fila de 5. Y los encabezados se insertan para cada nueva hoja de trabajo. Ver captura de pantalla:

doc-split-data-by-rows8

Haga clic para obtener más información sobre esta característica de división de datos.

Artículo relacionado:

¿Cómo dividir los datos en varias hojas de trabajo basadas en la columna en Excel?



Herramientas de productividad recomendadas

Office Tab

gold star1 Lleve las pestañas útiles a Excel y a otros programas de Office, como Chrome, Firefox y el nuevo Internet Explorer.

Kutools for Excel

gold star1 ¡Asombroso! Aumente su productividad en minutos 5. ¡No necesita ninguna habilidad especial, ahorre dos horas todos los días!

gold star1 Las nuevas características de 300 para Excel hacen que Excel sea mucho más fácil y potente:

  • Fusionar celdas / filas / columnas sin perder datos.
  • Combine y consolide varias hojas y libros de trabajo.
  • Comparar rangos, copiar rangos múltiples, convertir texto a la fecha, unidad y conversión de moneda.
  • Cuenta por colores, subtotales de paginación, clasificación avanzada y superfiltro,
  • Más Seleccionar / Insertar / Eliminar / Texto / Formato / Enlace / Comentario / Libros de trabajo / Hojas de trabajo Herramientas ...

Captura de pantalla de Kutools para 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 · 10 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?