Necesito una macro para copiar la celda activa de una hoja en otra celda de otra hoja

Soy nuevo en la página y un poco novato todavía con las macros de excel. Necesitaría una macro para copiar el valor de la celda que tengo activa en una hoja del libro excel a otra celda de otra hoja de ese mismo libro.

2 respuestas

Respuesta
4

Esta macro copia la celda completa que esta activa, la pega en la celda A1 de la hoja 2 y te devuelve a la celda activa inicial.

Sub Copia_Pega()
a = ActiveCell.Address
Range(a).Select
Selection.Copy
Sheets("Hoja2").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Hoja1").Select
Range(a).Select
Application.CutCopyMode = False
End Sub

Mil gracias, funciona, lo único que me trae todo y yo en la celda que quiero copiar tengo una fórmula. Únicamente necesitaría que pegara el valor. Mil gracias

Ok, esta macro hace lo que necesitas

Sub Copia_Pega()
a = ActiveCell.Address
valor = Range(a).value
Sheets("Hoja2").Select
Range("A1").value = valor
Sheets("Hoja1").Select
Range(a).Select
End Sub

Respuesta

Y si quiero pegar toda la fila donde esta la celda activa como se debería hacer.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macro buscar-pegar

Me ha surgido un problema con una hoja de exel de registro de operaciones que estoy montando, me veo en la necesidad de ingresar datos de una hoja de calculo a otra y creo que la mejor opción es empleando una macro pero mi problema es que no se como...
1 respuesta

Macro copiar formato

Querría saber si me podéis ayudar en la siguiente cuestión. Tengo el excel 2007, y querría saber si se podría hacer una macro donde se copiara el formato de una hoja y se aplicara en la otra, es decir sería lo mismo como si lo haces con el pincel...
1 respuesta

Macro para guardar hoja

Me gustaría saber si es posible obtener una macro que al ejecutarla me guarde la hoja activa con el valor de una celda. C3.
1 respuesta

Macro buscar copiar y pegar

Basándome en una macro realizada por ti para otra respuesta, la he adaptado a mi hoja y me funciona, pero necesitaría varias cosas: 1º que me aclararas algunas lineas (las pongo en negrita y cursiva) 2º necesito que al principio me quite los filtros...
1 respuesta

Macro de búsqueda coincidir copiar y pegar

Preciso una macro que en hoja2 se pare en la celda a1 y que el valor que tiene esta celda lo busque en la matriz de hoja1 que va de f16 a f6516, una vez encontrado preciso que en esa misma hoja se corra a la celda de la izquierda, es decir la celda...
1 respuesta

¿Cómo crear una tabla resumen clasificada de acuerdo a valor de una celda?

Tengo un archivo de excel conformado por varias hojas, en cada una de las hojas un resumen de gastos mensual que esta ordenado por fecha y esta compuesto de varios datos En la primera columna esta un código de clasificación (importante) y en las...
1 respuesta

Macro copiar valor ultima celda excluyendo celdas vacías

A toda la comunidad saludos desde méxico me pueden orientar o corregir una macro que tengo y que es la siguiente Sub Macro1() Sheets("Hoja1").Select Range("C8").Select Do While Not IsEmpty(ActiveCell) ActiveCell.Offset(1, 0).Select Loop...
1 respuesta

Macro de copia secuencial de una hoja a otra ?

Como ejemplo en hoja2 copio datos en amarillo B12:E13, B15:E16, B28:E39 y B41:E52 A hoja1 B12:E13. Los botones con macro creada con la grabadora que es lo único se hacer. Pues bien lo que necesito es un solo botón que cada vez que lo ejecute copie y...
2 respuestas

Cortar fila de una hoja y pegar en otra hoja en la siguiente libre

Y feliz año! Tengo un excel con 2 hojas, una con datos de pedidos antiguos y otro con datos de pedidos actualizados. Quiero hacer una macro que automáticamente copie la fila de los pedidos nuevos de la hoja 2 en la hoja 1 (al final), es decir...
1 respuesta

Opción para pegar antes de habiltar macro

Tengo el siguiente código el cual me copia y pega información de la hoja1 ala hoja 2 El cual es el siguiente: Sub MACOR()On Error Resume NextApplication.ScreenUpdating = FalseRange("a1:d1000" &...
1 respuesta