Macro pra copiar celdas en otra hoja

No se nada de macros, pero me interesa una en la cual copie algunas celdas y rangos en otra hoja, pero que al pergarlas me las copie en fila y no en columna es decir que si yo tengo información en la celda A1 y en a B3 en la hoja 1 llamemos así a la hoja origen, me las pegue en la hoja 2 (destino) en la celda A1, B1... Etc, pero al copiar nueva información no me sobrescriba la información ya copiada con anterioridad, si no que, se copie en la siguiente fila. No se si me explique.

1 Respuesta

Respuesta
2
Esta es una consulta frecuente, podrás encontrar otras respuestas con el buscador.
Aquí va mi ejemplo que es muy general pero con las explicaciones no tendrás problemas en ir completándolo.
Entrá al Editor (con Alt+F11), insertá un módulo y allí la copiás. Luego dibujá un botón y asígnales esta macro.
Sub pasandoDatos()
'macro desarrollada por Elsamatilde
dim filaUlt as long 'esta será la primer fila libre para acumular los datos
filaUlt = sheets("Hoja2").range("A65536").End(xlup).Row + 1
'luego pasarás cada celda de tu hoja 1 a las distintas col de la fila libre
sheets("Hoja2").cells(filaUlt,1) = Sheets("Hoja1").range("A5")
sheets("Hoja2").cells(filaUlt,2) = Sheets("Hoja1").range("B7")
'más datos
End Sub
Armála con tus datos y pruébala. Si te presenta algún error, escribime tu rutina y la línea que te pueda marcar de amarillo cuando presionas el botón Depurar.
Saludos
Elsa
* No te pierdas las novedades de Dbre, en:
http://es.geocities.com/lacibelesdepunilla/manuales

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Copiar datos de una columna a otra hoja

Primero que todo felicidades por la pagina muy bonita. La pregunta es esta en mi hoja 1 capturo como 20 datos en la columna b1 hasta b20 y con un botón mandarlos a la hoja 2 que es mi base de datos solamente que en la fila 1 tengo los títulos y deseo...
2 respuestas

Copiar rango de celdas a otra hoja con pegado especial (Luis Mondelo)

Encontré esta macro de Luis Mondelo que copia un rango especifico de celdas en otra hoja en la primera fila libre: Sub copiar() fila = sheets("hoja2").Range("a65000").End(xlUp).Row + 1 Range("a6:n6").Copy Destination:=Sheets("hoja2").Cells(fila, 1)...
1 respuesta

Buscar dato, copiar rango y pegar traspuesto

Dios les bendiga, primero que todo saludar a todos los expertos que han sido de gran ayuda en mi proceso de formación laboral y agradecer a todoexpertos por crear esta pagina la cual ha sido de mucha ayuda. Tengo un libro compuesto por dos hojas...
1 respuesta

Macro para pegar datos en celda vacía

Necesito de la colaboración de los expertos. Bueno, tengo un libro con dos hojas (Hoja1 y Hoja2). La hoja1 me sirve como formulario en la que lleno datos, los cuales deseo copiar a la hoja 2. Tanto la Hoja1 como la Hoja2 tienen los siguientes...
1 respuesta

Macro que vea si se cumple una condición y copie otra celda de la fila, si no que baje y re-evalúe

Necesito ayuda para crear una macro que evalué si una celda (HOJA 1, Celda L2) cumple una condición. Si la condición se cumple (="Cobro"), que copie el contenido de una segunda celda de la misma fila (HOJA 1, Celda B2) y lo pegue en una tercer celda...
2 respuestas

Excel copiar datos a otra hoja en fila vacia para Dam

Quiero copiar datos de una determinada columna (hoja1) a hoja 2 ya tengo echo el procedimiento lo único malo que al copiarlo me los copia en la misma fila, que instrucción me falta para que pase a la siguiente fila El código es este : Sub copiar()...
4 respuestas

Macro para comparar datos de 2 libros de excel

Tengo una base la cual se alimenta con varios Excel... Llamemos les id (el num puede ser variable) yo tengo que comparar una columna de la base con una del id"el num es variable" y el dato de la casilla "a1" del id colocarlo en la columna "ah" de la...
1 respuesta

Macro pega valores actualizados al final

Les tengo la siguiente consulta: Tengo una consulta a una base de datos que se actualiza cada 5 minutos automáticamente. Esta actualización entrega un valor. En la celda A1 de la Hoja1. Necesito que cada vez que se actualize la base, ese nuevo valor...
1 respuesta