¿como dejar constancia de la hora en que se introdujo un dato?

31/03/2005 - 10:27 por cloud | Informe spam
Desearia a traves de excel saber como puedo creando por ejemplo una hoja para
un horario de trabajo como puedo hacer para que me deje fija la hora en que
puse mi firma digital o en que puse una x de incorporacion al trabajo.

Yo utilizo la funcion de ahora() pero me va variando la hora cada vez que
introduzco otro dato.
 

Leer las respuestas

#1 KL
31/03/2005 - 10:57 | Informe spam
Hola cloud,


Yo utilizo la funcion de ahora() pero me va variando la hora cada vez que
introduzco otro dato.



Esto es normal ya que la funcion AHORA es volatil por diseño.

Desearia a traves de excel saber como puedo creando por ejemplo una hoja
para
un horario de trabajo como puedo hacer para que me deje fija la hora en
que
puse mi firma digital o en que puse una x de incorporacion al trabajo.



Se me ocurren dos cosas:

1) Pulsa las teclas Ctrl+: para introducir una hora fija. Dependiendo de tu
teclado es posible que tengas que usar Ctrl+Mayusc+:

2) Haz lo siguiente:
- clic derecho sobre el nombre de la hoja en cuestion, el cual aparece en
una de las pestañas en la parte inferior izquierda de la ventana de Excel
- elige Ver Codigo para abrir el Editor de VBA
- pega el siguiente codigo en la ventana mas grande a la derecha
'-Inicio Codigo--
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Tabla As Range, rng As Range
Set Tabla = Me.Range("B2:H100")
Set rng = Intersect(Target, Tabla)
If rng Is Nothing Then Exit Sub

For Each celda In rng
If celda = "x" Then
On Error Resume Next
celda.Comment.Delete
celda.AddComment Format(Now, _
"dd/mm/yyyy hh:mm:ss")
Else
On Error Resume Next
celda.Comment.Delete
End If
Next celda
End Sub
'-Fin Codigo--
- cambia si es necesario "B2:H100" por el rango real de la tabla donde pones
las "x"
- pulsa Alt+F11 para volver a la hoja
- prueba introducir las x

Importante:
1) Para que el codigo funcione los macros deben habilitarse al abrir el
fichero.
2) La fecha y hora se introducen en el comentario de la celda, no en la
celda misma. Si quieres que se graven en celdas deberas dar mas detalles
sobre el diseño de tu hoja.
3) Si borras la "x" o cambias el contenido de la celda de otra manera, se
pierde (se borra) el comentario con la fecha y hora
4) Si teniendo una "x" introducida simplemente metes el cursor dentro de la
celda y luego pulsas Enter, se actualiza la fecha y hora.
5) Si es necesario puedes modificar el comentario a mano.

Saludos,
KL

Preguntas similares