Fecha y hora a una celda segun datos de otra celda

23/05/2006 - 22:41 por KM**VE | Informe spam
Hola amigo, como hago para coloca una fecha automática según lo que escribo
en una celda especifica.





Ejemplo: tengo una columna (F) y columna (G)

Escribo un valor en la Columna (F) y Quero que me sale la fecha y hora en
la columna (G) de lo que escribí el Columna (F)



Ejemplo: tengo una la celda (C2) y la Celda (D1)

Escribo un valor en la (C2) y Quero que salga la fecha y hora que escribí
que salgan en la celda (D1)

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
24/05/2006 - 04:34 | Informe spam
hola, KM !

... 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.
Respuesta Responder a este mensaje
#2 KM**VE
24/05/2006 - 19:28 | Informe spam
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:
hola, KM !

... 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.

Respuesta Responder a este mensaje
#3 Héctor Miguel
24/05/2006 - 23:54 | Informe spam
hola, KM !

... 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.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida