Problema excel

Hola, Joselin [¿Javier?] !

Mostrar la cita

... datos en unas celdas ... vayan (cada vez que ... datos nuevos) a otra hoja del mismo cuaderno
... en celdas secuenciales para ir registrando todos los datos que he generado en la primera hoja.

==> con los siguientes 'supuestos':
1) la hoja con los datos que 'van a ir cambiando' se llama 'Hoja1'
2) el rango de celdas que se va a 'controlar' son las celdas 'A1', 'B2' y el rango 'C3:C5'
3) la hoja donde se llevara el 'registro' de los cambios se llama 'Hoja2'

el siguiente codigo 'pasara' [secuencialmente] a la Hoja2, que celda cambia, el valor [o dato] 'nuevo', fecha y hora.
=> modifica el rango de celdas 'supuesto' y puedes tambien modificar los formatos de fecha y hoja < para activar el modulo de codigo de Hoja1 => 'click-derecho' [sobre la pestaña del nombre] -> Ver codigo...
en el modulo de codigo de 'Hoja1' ==Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1,b2,c3:c5")) Is Nothing Then Exit Sub
With Worksheets("Hoja2").Range("a65536").End(xlUp)
.Offset(1) = Target.Address
.Offset(1, 1) = Target
.Offset(1, 2) = Format(Date, "dd/mmm/yyyy")
.Offset(1, 3) = Format(Time, "h:mm:ss a/p")
End With
End Sub
_______
Saludos,
Héctor.
MS-MVP

¿no te sirve el control de cambios?


"joselin" escribió en el mensaje
news:
Mostrar la cita

Por primera vez me atrevo a incorporarme a este grupo que he visto
funciona muy bien. Bueno, el problema que tengo es que he realizado
una hoja excel con unos datos en una celdas y que van a cambiar
frecuentemente y necesito que estos datos vayan (cada vez que
introduzca datos nuevos) a otra hoja del mismo cuaderno, pero en
celdas secuenciales para ir registrando todos los datos que he
generado en la primera hoja.
gracias por vuestro tiempo.
joselin