Las cookies nos ayudan a ofrecer nuestros servicios. Al utilizar nuestros servicios, usted acepta el uso de cookies.
Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Registrate
x

or

¿Cómo combinar múltiples libros de trabajo en un libro de trabajo en Excel?

¿Alguna vez se ha quedado atascado cuando tiene que combinar varios libros de trabajo en un solo libro de trabajo en Excel? Lo más terrible es que el libro de trabajo que necesita combinar contiene varias hojas de trabajo. ¿Alguien puede sugerir una buena manera de manejar este problema?

Combine múltiples libros de trabajo con un libro de trabajo con VBA

Combine múltiples libros de trabajo en un libro de trabajo con el comando Mover o Copiar

Combina fácilmente varios libros de trabajo con un libro de trabajo con Kutools para Excel


Combina fácilmente varias hojas de trabajo / libros de trabajo en una sola hoja de trabajo / libro de trabajo:

Combine varias hojas de trabajo o libros de trabajo en una única hoja de trabajo o libro de trabajo puede ser una gran tarea en su trabajo diario. Pero, si tienes Kutools for Excel, su poderosa utilidad - Combinar puede ayudarlo a combinar rápidamente varias hojas de trabajo, libros de trabajo en una sola hoja de cálculo o libro de trabajo. ¡Descargue la función completa 60-day gratis de Kutools for Excel ahora!

Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


Combine múltiples libros de trabajo con un libro de trabajo con VBA

Para los programadores expertos y profesionales, puede usar scripts de VBA para combinar varios libros de trabajo en un libro de trabajo maestro. Puede tratar esto con los siguientes pasos:

1. Coloque todos los libros que desee combinar en el mismo directorio. Ver captura de pantalla:

2. Inicie un archivo de Excel en el que desee combinar otros libros de trabajo.

3. Hacer clic Desarrollador > Visual Basic, Un nuevo Microsoft Visual Basic para aplicaciones se mostrará la ventana, haga clic recuadro > Móduloe ingrese el siguiente código en el Módulo:

Sub GetSheets()
Path = "C:\Users\dt\Desktop\dt kte\"
Filename = Dir(Path & "*.xls")
  Do While Filename <> ""
  Workbooks.Open Filename:=Path & Filename, ReadOnly:=True
     For Each Sheet In ActiveWorkbook.Sheets
     Sheet.Copy After:=ThisWorkbook.Sheets(1)
  Next Sheet
     Workbooks(Filename).Close
     Filename = Dir()
  Loop
End Sub

Tip: En el código anterior, puede cambiar la ruta a la que está utilizando.

4. Luego haga clic doc-merge-multiple-workbooks-button para ejecutar el código, y todas las hojas de cálculo (incluidas las hojas de trabajo en blanco) dentro de los libros de trabajo se han fusionado en el libro maestro.

notas: Este código de VBA puede combinar todos los libros de trabajo en el libro de trabajo maestro, si desea combinar hojas de trabajo especificadas de los libros de trabajo, este código no funcionará.


Combine múltiples libros de trabajo en un libro de trabajo con el comando Mover o Copiar

Si es un novato de Microsoft Excel, no tiene más remedio que copiar los datos de cada hoja y pegarlos en un nuevo libro de trabajo uno por uno y aplicar el comando Mover o Copiar. Utilizando el Mover o copiar comando le ayudará a exportar o copiar una o varias hojas de cálculo a un nuevo libro de trabajo rápidamente.

1. Abra todos los libros que desee fusionar en un solo libro de trabajo.

2. Seleccione todos los nombres de la hoja de trabajo de un libro en la barra de pestañas. Puede seleccionar múltiples con presionar Ctrl o cambio llave. Haga clic con el botón derecho en el nombre de la hoja de trabajo y haga clic en Mover o copiar del menú de contexto.

3. En Mover o copiar cuadro de diálogo, seleccione el libro maestro en el que desea fusionar otros libros de la lista desplegable de Mueva las hojas seleccionadas para reservar. Y luego especifique la ubicación de las hojas de trabajo fusionadas. Ver capturas de pantalla:

4. Luego haga clic OK. Las hojas de trabajo seleccionadas se han movido al libro de trabajo maestro.

5. Repita los pasos de 2 a 4 para mover otros libros de trabajo al libro maestro. Luego combina todas las hojas de trabajo de los libros abiertos en un solo libro de trabajo. Ver capturas de pantalla:


Combina fácilmente varios libros de trabajo con un libro de trabajo con Kutools para Excel

Afortunadamente, para novatos y nuevas manos de Microsoft Excel, hay algunas herramientas disponibles para ayudarlo a combinar rápidamente cientos de libros en uno. La función Combinar in Kutools for Excel hace que sea mucho más fácil combinar múltiples archivos de Excel. La aplicación se utiliza para liberar las operaciones repetitivas y redundantes en Excel. De hecho, juega un papel importante si tiene que lidiar con una gran cantidad de archivos de Excel en su trabajo diario. Ahora, veamos cómo hacer funcionar esta función para combinar múltiples libros de trabajo.

Kutools for Excel : con más de 300 útiles complementos de Excel, gratis para probar sin limitaciones en los días 60.

1. Habilitar Excel y hacer clic Kutools Más > Combinar. Luego aparece un cuadro de diálogo para recordarle que todos los libros de trabajo combinados deben guardarse y que la función no se puede aplicar a los libros protegidos, haga clic en OK botón.

2. En la Combine hojas de trabajo asistente, seleccionar Combina varias hojas de trabajo de libros de trabajo en un libro de trabajo, y luego haga clic en Siguiente botón. Ver captura de pantalla:

2. Luego puede ver todos los libros de trabajo abiertos y las hojas de trabajo se enumeran en Combine hojas de trabajo - Paso 2 de 3 caja de diálogo. Haga clic en el añadir > Archivo / carpeta para agregar otros archivos o carpetas de Excel que contengan los archivos de Excel que combinará. Después de seleccionar los archivos, haga clic en Siguiente botón para seguir adelante. Ver captura de pantalla:

doc fusionar múltiples libros de trabajo arrow1

3. En la Combine hojas de trabajo - Paso 3 de 3 cuadro de diálogo, realice la siguiente configuración:

  • 3.1 Puede excluir todas las hojas de cálculo en blanco de la fusión seleccionando omitir desde el Al encontrar una hoja de trabajo en blanco la lista desplegable.
  • 3.2 Compruebe la Primera fila de cada hoja de trabajo (Comentario) opción para insertar información de la hoja de trabajo de cada hoja de trabajo combinada.
  • 3.3 Puede cambiar el nombre de las nuevas hojas de trabajo combinadas insertando los nombres del libro de trabajo antes o después de los nombres originales de la hoja de trabajo, o simplemente conservar los nombres originales de la hoja de trabajo sin desmarcar el Al insertar el nombre del libro de trabajo opción.
  • 3.4 Haga clic en Terminar botón.

4. A continuación, elija una carpeta para guardar el libro de trabajo combinado, y ábralo directamente según lo necesite. Ahora todos los libros de trabajo especificados se combinan en uno.

Notas:

1. Se le preguntará si desea guardar este escenario. Hacer clic para guardar cuando lo necesite, luego ingrese el nombre del escenario (vea las siguientes capturas de pantalla). Después de guardar el escenario, solo necesita hacer clic Guión para elegir el nombre del escenario en el asistente step2 para usarlo directamente.

2. Las hojas de trabajo en libros de trabajo seleccionados se han fusionado en un nuevo libro de trabajo, y las hojas de trabajo se nombran con el nombre del libro de trabajo antes o después del nombre de la hoja de trabajo original si ha marcado el Al insertar el nombre del libro de trabajo opción. Mientras tanto, una nueva hoja de trabajo llamada Kutools for Excel se genera antes de todas las hojas de trabajo, que enumera los libros de trabajo con información detallada de cada hoja de trabajo. Ver captura de pantalla:

3. Si el nombre de su hoja de trabajo es demasiado largo, tal vez los caracteres del nombre sean mayores que 31characters, el nombre combinado no se mostrará y solo mostrará el nombre original de la hoja.

Propina.Si desea tener una versión de prueba gratuita de esta utilidad, vaya a descarga el software libremente primero, y luego vaya a aplicar la operación de acuerdo a los pasos anteriores.


Office Tab - Navegación con pestañas, edición y administración de libros en Excel:

Office Tab trae la interfaz con pestañas como se ve en los navegadores web como Google Chrome, nuevas versiones de Internet Explorer y Firefox a Microsoft Excel. Será una herramienta de ahorro de tiempo e irremplazable en su trabajo. Vea la demostración a continuación:

¡Haz clic para obtener una versión de prueba gratuita de Office Tab!

Pestaña Office para Excel

Demostración: combine fácilmente múltiples libros de trabajo en un libro de trabajo con Kutools para Excel




Artículos relacionados:



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.
    pat · 2 years ago
    I followed the instructions but when I Run a screen opens that lists Macros. I select GetSheets and Run but nothing happens.

    Sub GetSheets()
    Path = "G:\COM\Diabetes Center\Pat\Time Sheets\My time Sheet 2013"
    Filename = Dir(Path & "*.xlsx")
    Do While Filename ""
    Workbooks.Open Filename:=Path & Filename, ReadOnly:=True
    For Each Sheet In ActiveWorkbook.Sheets
    Sheet.Copy After:=ThisWorkbook.Sheets(1)
    Next Sheet
    Workbooks(Filename).Close
    Filename = Dir()
    Loop
    End Sub
  • To post as a guest, your comment is unpublished.
    BWANG · 2 years ago
    Thanks. With some changes, the following works for me:

    Sub GetSheets() 'make sure the module is created in the current Excel spreadsheet "Weather data 201611.xlsx", not the "Personal.xlsb"
    Path = "C:\Weather Data\201611\" 'remember to change the file location here
    Filename = Dir(Path & "*.csv") ' .csv is the type of file while we wanted to open, change to xls or xlsx if required
    Do While Filename ""
    Workbooks.Open Filename:=Path & Filename, ReadOnly:=False 'Depending on the files which we want to open, if it is a read only file then change to ReadOnly:=True
    For Each Sheet In ActiveWorkbook.Sheets
    Sheet.Copy After:=Workbooks("Weather data 201611.xlsx").Sheets(1) 'Remember to change the file name to the file name while is new open for this module. Make sure the type match as well
    Next Sheet
    Workbooks(Filename).Close
    Filename = Dir()
    Loop
    End Sub
  • To post as a guest, your comment is unpublished.
    Rakesh G.B.Groups · 2 years ago
    i want to mix or update a excel file by a old file data and new file data
    please suggest me command

    Thank you
  • To post as a guest, your comment is unpublished.
    wackiemark · 2 years ago
    hello can anyone please help me with this problems in different codes.

    1.) copy all sheets in selected workbooks in a folder and paste it to current workbook. and if the worksheets have same sheetname, it will add a number e.g (1) on the side of the sheetname.

    2.) copy specific worksheet in selected workbooks and paste to current workbook, and if the worksheets have same sheetname, it will add a number e.g (1) on the side of the sheetname.

    thank you in advance
  • To post as a guest, your comment is unpublished.
    Ashwath · 2 years ago
    Hello, I tried this code for combining the files and it worked well. However I have a situation where in I have to combine the data from different sheets of multiple files in to one master file with multiple sheets.

    For ex: I have 10 different file and each file has data in Sheet 1 and Sheet 2. I want to create a consolidate data in to one master and all data from sheet 1 of multiple files should be consolidated in one sheet 1 of master and sheet 2 in sheet of master. Can this be done?