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

Buenos días:

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)?. Gracias

1 respuesta

1
Respuesta de

Hola, este sería el ejemplo a seguir:

En mi caso tengo una hoja llamada "resumen" donde quiero juntar todos los datos introducidos en la celda A1 de cada una de las otras hojas.  Ejecutando esta macro lo conseguimos:

Sub acumular()

For Each hoja In ActiveWorkbook.Sheets

fila = Sheets("resumen").Range("a65000").End(xlUp).Row + 1

If hoja.Name <> "resumen" Then

hoja.Select

Range("a1").Copy Destination:=Sheets("resumen").Cells(fila, 1)

End If

Next

Sheets("resumen").Select

End Sub

POR FAVOR, RECUERDA FINALIZAR Y PUNTUAR MI LABOR

Gracias por su rápida respuesta. No tengo ni idea de macros, pero la he copiado tal cual, pero solo me copia la celda de la primera hoja. Puede indicarme donde debo hacer las modificaciones en la fórmula para indicar las celdas y las hojas que quiero?. Puede marcármelo en otro color?. Es que estoy pez en formulación. Gracias.

mejor dime un mail y te mando un ejemplo para que lo puedas usar y además lo puedes ver funcionando.

puedo enviarte el correo que no sea de manera pública?

te digo el mio.  A mi me da igual ponerlo aquí:

luismondelo@gmail.com

Añade un comentario a esta respuesta
Añade tu respuesta
Haz clic para o
Escribe tu mensaje
¿No es la respuesta que estabas buscando? Puedes explorar otras preguntas del tema Microsoft Excel o hacer tu propia pregunta: