Fecha y hora a una celda segun datos de otra celda

hola, KM !

Mostrar la cita

... para coloca una fecha automatica segun lo que escribo en una celda especifica.
Ejemplo: Escribo un valor en la Columna (F) y... la fecha y hora en la columna (G)...
Ejemplo: Escribo un valor en... (C2) y... la fecha y hora... en... (D1)

toma en cuenta que 'los patrones' que usas como ejemplo NO son 'constantes' :( [me explico]...
a) si por dato que escribas en columna F quieres la fecha y hora en columna G
el patron es -> una columna a la derecha de la celda donde escribes ;)
b) si el dato lo escribes SIEMPRE en 'C2' y quieres la fecha y hora SIEMPRE en 'D1'
no hace falta ningun 'patron'... [pero]... las afectaciones seran SIEMPRE donde mismo -?-
c) si borras un dato, o lo modificas, y YA habia una fecha y hora 'anteriores'...
que se supone que debiera suceder ? [reemplazar SIEMPRE por fecha y hora nuevos ?] -???-

en via de mientras, copia las siguientes lineas...
en el modulo de codigo de la hoja donde vas a escribir los datos ==Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Then Target.Offset(, 1) = Now
If Target.Address = "$C$2" Then Range("d1") = Now
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Hola Hector gracias por tu ayuda funcionó perfectamente lo que necesitaba,

Una pregunta más tengo la hoja protegida Bajo clave y eso me sale un error
como hago con las celdas protegida, yo lo tengo bloqueada para que nadie
modifica o borra los datos.

KM**VE



"Héctor Miguel" escribió en el mensaje
news:
Mostrar la cita

hola, KM !

Mostrar la cita

... para coloca una fecha automatica segun lo que escribo en una celda
especifica.
Ejemplo: Escribo un valor en la Columna (F) y... la fecha y hora en la
columna (G)...
Ejemplo: Escribo un valor en... (C2) y... la fecha y hora... en... (D1)

toma en cuenta que 'los patrones' que usas como ejemplo NO son
'constantes' :( [me explico]...
a) si por dato que escribas en columna F quieres la fecha y hora en
columna G
el patron es -> una columna a la derecha de la celda donde escribes
;)
b) si el dato lo escribes SIEMPRE en 'C2' y quieres la fecha y hora
SIEMPRE en 'D1'
no hace falta ningun 'patron'... [pero]... las afectaciones seran
SIEMPRE donde mismo -?-
c) si borras un dato, o lo modificas, y YA habia una fecha y hora
'anteriores'...
que se supone que debiera suceder ? [reemplazar SIEMPRE por fecha y
hora nuevos ?] -???-

en via de mientras, copia las siguientes lineas...
en el modulo de codigo de la hoja donde vas a escribir los datos ==> Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Then Target.Offset(, 1) = Now
If Target.Address = "$C$2" Then Range("d1") = Now
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

hola, KM !

Mostrar la cita

... tengo la hoja protegida Bajo clave y eso me sale un error
como hago con las celdas protegida, yo lo tengo bloqueada para que nadie modifica o borra los datos.

suponiendo que previamente ya has 'desbloqueado' las celda que SI podra modificar el usuario...

1) copia las siguientes lineas -> en el modulo de codigo del libro [ThisWorkbook]
[no olvides poner TU clave/password real] :))
Private Sub Workbook_Open()
Worksheets("Hoja1").Protect _
PassWord:="la MISMA cOntRaSe#a qUe lE pUsISte", _
UserInterfaceOnly:=True
End Sub

2) selecciona la primer linea del codigo anterior... y pulsa {F5}

3) cierra el editor de vba y... corre algunas pruebas ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.