Copiar una celda en otra hoja y bajar una celda.

Que tal gente, soy nuevo en esto del Xls. Y necesito crear una macro que haga lo siguiente. Copie un valor de (por ejemplo) Hoja1 A5 y la pegue en Hoja2 B7 y que al copiarla me baje una celda en Hoja2, puesto que en Hoja1 A5 ingresa un valor diaria, y en Hoja2 B7 tiene que ir guardando ese valor. Pero ojo, aquí no termina la cosa, la condición es que si hoy (por ejemplo) Hoja1 A5 no tiene valor, en Hoja2 B7 deje el espacio en blanco y se sitúe en la celda de abajo, para que mañana, si Hoja1 A5 tiene valor, en Hoja2 se vaya incorporando el dato.
Bueno, espero a ver sido claro.
Saludos.

1 respuesta

Respuesta
1
Sub mymacro()
Sheets("hoja2").Select
Range("b65536").End(xlUp).Offset(1,0).Select
i = ActiveCell.Row
Range("b" & i).Value = WorkSheets("hoja1").Range("a5").Value
Range("b7").Select
Sheets("hoja1").Select
Range("a5").Select
End Sub
Copia y pega esta macro

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas