¿Cómo dividir un libro de trabajo en archivos de Excel separados en Excel?

Normalmente, usar los comandos Copiar y Pegar puede guardar un libro de trabajo como un archivo de Excel separado manualmente. Primero, seleccione toda la hoja de cálculo que desea guardar como un archivo separado, cree un nuevo libro de trabajo y luego péguelo en el nuevo libro de trabajo, y al final guárdelo.

Este es un método fácil de usar si necesita dividir solo unas pocas hojas de cálculo como archivos separados. Sin embargo, dividir muchas hojas de cálculo con copiar y pegar manualmente puede ser muy lento y tedioso.

Este método presentará la función Mover o Copiar para mover o copiar las hojas seleccionadas a un nuevo libro de trabajo y guardarlas como un libro de trabajo separado. Por favor, haga lo siguiente:

1. Seleccione las hojas en la barra de pestañas de Hoja, haga clic derecho y seleccione Mover o Copiar desde el menú contextual. Ver captura de pantalla:

Nota: Manteniendo presionada la tecla Ctrl puede seleccionar varias hojas no adyacentes haciendo clic en ellas una por una en la barra de pestañas de Hoja; manteniendo presionada la tecla Shift puede seleccionar varias hojas adyacentes haciendo clic en la primera y la última en la barra de pestañas de Hoja.

2. En el cuadro de diálogo Mover o Copiar, seleccione (nuevo libro) desde la lista desplegable Libro destino marque la opción Crear una copia y haga clic en el botón Aceptar Ver captura de pantalla:

3. Ahora todas las hojas seleccionadas se han copiado a un nuevo libro de trabajo. Haga clic en Archivo > Guardar para guardar el nuevo libro de trabajo.

Si tiene instalado Kutools para Excel, su herramienta Dividir Libro de Trabajo puede dividir varias hojas de cálculo como archivos de Excel separados de manera conveniente y rápida con solo unos pocos clics.

1. Después de instalar Kutools para Excel, haga clic en Kutools Plus > Dividir Libro de Trabajo , ver captura de pantalla:

2. En el Dividir Libro de Trabajo cuadro de diálogo, realice las siguientes operaciones:
(1) Todos los nombres de las hojas están marcados por defecto. Si no desea dividir algunas de las hojas, puede desmarcarlas;
(2) Marque la opción Guardar un tipo opción;
(3) Desde la lista desplegable Guardar como tipo elija un tipo de archivo que desee dividir y guardar.
(4) Luego haga clic en el botón Dividir botón.

Nota: Si desea evitar dividir las hojas ocultas o en blanco, puede marcar la casilla Omitir hojas de cálculo ocultas u Omitir hojas de cálculo en blanco.

3. En el cuadro de diálogo Examinar Carpeta, especifique una carpeta de destino para guardar los archivos divididos y haga clic en el botón Aceptar botón.

Ahora las hojas de cálculo marcadas se han guardado como nuevos libros de trabajo separados. Cada nuevo libro de trabajo está nombrado con el nombre original de la hoja de cálculo. Ver captura de pantalla:

La herramienta Dividir Libro de Trabajo de Kutools para Excel facilita dividir el libro de trabajo activo en archivos de Excel individuales (un archivo contiene una hoja de cálculo), archivos CSV, archivos TXT o archivos PDF según sea necesario. Puede configurarlo para omitir todas las hojas de cálculo en blanco y ocultas. ¡Pruebe gratis!

El siguiente código VBA puede ayudarle a dividir rápidamente varias hojas de cálculo del libro de trabajo actual en archivos de Excel separados, siga estos pasos:

1. Cree una nueva carpeta para el libro de trabajo que desea dividir, ya que los archivos de Excel divididos estarán en la misma carpeta que este libro maestro.

2. Mantenga presionadas las teclas ALT + F11 en Excel, y se abrirá la ventana Microsoft Visual Basic para Aplicaciones.

3. Haga clic en Insertar > Módulo, y pegue el siguiente código en la Ventana de Módulo.

VBA: Dividir un libro de trabajo en múltiples libros de trabajo y guardar en la misma carpeta

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. Presione la tecla F5 para ejecutar este código. Y el libro de trabajo se divide en archivos de Excel separados en la misma carpeta que el libro de trabajo original. Ver captura de pantalla:

Nota: Si una de las hojas tiene el mismo nombre que el libro de trabajo, este VBA no funcionará.

Combinar múltiples libros de trabajo en un solo libro de trabajo

Guardar una selección como archivo individual