Macro para juntar 4 hojas, en una sola hoja?

Buen dia Expertos

Tengo el siguiente codig con el cual junto la oinformación de varias hojas en una sola, pero quiero mejorarla para juntar la información solo de las hojas que yo quiera y no de todas las que están en el libro. Me pueden apoyar..?

Application.ScreenUpdating = False
Worksheets.Add
Worksheets(1).Name = "Consolidado"
For Each Ws In ActiveWorkbook.Worksheets
Ws.Select
Selection.CurrentRegion.Copy
Worksheets(1).Select
Range("A1048576").End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
Next Ws

Gracias, buen dia

1 respuesta

Respuesta
1

En el mismo bucle debes controlar de qué hojas se trata. Por ej: si solo necesitas las hojas llamadas Hoja 1 y Hoja2:

For Each Ws In ActiveWorkbook.Worksheets

If Ws.Name = "Hoja1" or Ws.Name = "Hoja2" then
Ws.Select

'...... todo lo demás

End If

Next Ws

Sdos y no olvides finalizar la consulta.

Elsa

PD) En pocos días más, la nueva Guía Temática: Bucles en Excel... no te las pierdas !

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Como ejecutar una macro en todas las hojas de XLSX

Estoy trabajando en excel 2010 con la macro que cambia de minúsculas a mayúsculas las palabras pero quiero ejecutar esta misma macro en todas las hojas sin tener que hacerlo hoja por hoja
1 respuesta

Macro con formato condicional

Antes que nada, agradeceros a todos los expertos en general y a ti en particular vuestra labor, profesionalidad y acierto en todas las consultas que os venimos haciendo. He estado siguiendo las respuestas que diste para crear una macro que identifica...
1 respuesta

Guardar como pdf excel

Estoy realizando una macro que pueda unificar el contenido de varias hojas en un solo PDF, quiero que automáticamente seleccione un rango diferente en cada hoja para que solo imprima ese rango seleccionado en el PDF final. Ej: tengo 4 hojas...
1 respuesta

Macro limpiar Hojas

Necesito una macro que me permita borrar todo el contenido de varias hojas de excel en un mismo libro. En mi libro las 4 primeras hojas son fijas (no deseo borrarlas), pero de ahí en adelante son hojas de reportes que irán variando, por eso necesito...
1 respuesta

Como juntar los datos de varias hojas en una sola

Tengo un archivo en el cual hay más de 20 hojas, pero necesito tener esa información en una sola hoja, como puedo juntar todas esas hojas.
2 respuestas

Necesito copiar los datos de varias hojas excel y misma celda en una sola hoja y correlativos.

Tengo un libro excel con varias hojas. En cada hoja y en la misma celda hay un dato numérico. Hay manera automática de traspasar todos esos datos de la misma celda ¿A una sola hoja y que se copiaran correlativas (una debajo de otra)?.
1 respuesta

Juntar información en una sola hoja

Espero que me puedan ayudar con una macro que permita juntar la información de 6 hojas que tengo en una sola hoja teniendo en cuenta que la información de cada hojapuede cambiar en cantidades, el formato que utilizo es una base de datos en 2003,...
1 respuesta

Ejecutar macro solo en una hoja del libro

Tengo un excel con una macro que consiste en darle a un boton, y se envía el texto de esa página en un mail (a unos destinatarios y un asunto concreto, que tu previamente has configurado en la macro). El problema es que yo copio esa hoja, con ese...
1 respuesta