Hora automatica

"richard" escribió en el mensaje news:

Si en una cela escribo un dato, se puede poner automaticamente a un lado la
hora o el dia y que quede fija? que no se cambia al abrir de nuevo el
earchivo?


gracias anticipadas

Mira si te sirve esto:

http://www.excelsp.com/eventos01.htm#eventos01_3

Un saludo.


Fernando Arroyo
MS MVP - Excel

El problema es que no se mucho de excel y tengo la version en ingles, en
donde meto esto?
digo, si no es mucho abuso


"Fernando Arroyo" escribió en el mensaje
news:%
"richard" escribió en el mensaje
news:

Si en una cela escribo un dato, se puede poner automaticamente a un lado

la

hora o el dia y que quede fija? que no se cambia al abrir de nuevo el
earchivo?


gracias anticipadas

Mira si te sirve esto:

http://www.excelsp.com/eventos01.htm#eventos01_3

Un saludo.


Fernando Arroyo
MS MVP - Excel

"richard" escribió en el mensaje news:%

El problema es que no se mucho de excel y tengo la version en ingles, en
donde meto esto?
digo, si no es mucho abuso

No, no lo es :-)

Lo primero: el código debería funcionar sin problemas en la versión inglesa de Excel. Sobre la forma de implementarlo, estos son los pasos:

- con el libro abierto, pulsa Alt + F11 para entrar en el editor de VBA
- en la ventana "Proyecto" (normalmente a la izquierda), doble click en el nombre de la hoja
- pega el código en la ventana de código (la más grande)

Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Target.Parent.Range("A2:A10")) Is Nothing Then Exit Sub

Application.EnableEvents = False
Target.Offset(, 1) = Now
Application.EnableEvents = True
End Sub

Ten en cuenta que, tal como está el código, la fecha y hora serán puestas automáticamente en el rango B2:B10 cada vez que se modifique la misma celda del rango A2:A10. Tendrás que modificarlo para que haga lo que necesites (o dínoslo y te lo modificamos nosotros).
Un saludo.


Fernando Arroyo
MS MVP - Excel

Muchisimas gracias, ya hice lo que me indicaste y si funciono!, lo que
necesito es hacer una hoja para registrar la asistencia del personal, lo que
quiero es que al poner su numero de empleado quede registrado en un campo el
DIA de registro y en otro campo la HORA del registro para poder hacer
calculos y sacar diferencias y retardos, he visto varios demos de programas
para control de asistencia pero ninguno puedes manipular la informacion, por
eso quiero hacerlo mas personalizado en excel.




"Fernando Arroyo" escribió en el mensaje
news:
"richard" escribió en el mensaje
news:%

El problema es que no se mucho de excel y tengo la version en ingles, en
donde meto esto?
digo, si no es mucho abuso

No, no lo es :-)

Lo primero: el código debería funcionar sin problemas en la versión inglesa
de Excel. Sobre la forma de implementarlo, estos son los pasos:

- con el libro abierto, pulsa Alt + F11 para entrar en el editor de VBA
- en la ventana "Proyecto" (normalmente a la izquierda), doble click en el
nombre de la hoja
- pega el código en la ventana de código (la más grande)

Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Target.Parent.Range("A2:A10")) Is
Nothing Then Exit Sub

Application.EnableEvents = False
Target.Offset(, 1) = Now
Application.EnableEvents = True
End Sub

Ten en cuenta que, tal como está el código, la fecha y hora serán puestas
automáticamente en el rango B2:B10 cada vez que se modifique la misma celda
del rango A2:A10. Tendrás que modificarlo para que haga lo que necesites (o
dínoslo y te lo modificamos nosotros).
Un saludo.


Fernando Arroyo
MS MVP - Excel

Podrian facilitarme el macro pero para version en español, lo intente y no
funciono con el macro de la pagina web y el que decsriben.

Gracias

"richard" escribió:

Muchisimas gracias, ya hice lo que me indicaste y si funciono!, lo que
necesito es hacer una hoja para registrar la asistencia del personal, lo que
quiero es que al poner su numero de empleado quede registrado en un campo el
DIA de registro y en otro campo la HORA del registro para poder hacer
calculos y sacar diferencias y retardos, he visto varios demos de programas
para control de asistencia pero ninguno puedes manipular la informacion, por
eso quiero hacerlo mas personalizado en excel.




"Fernando Arroyo" escribió en el mensaje
news:
"richard" escribió en el mensaje
news:%
> El problema es que no se mucho de excel y tengo la version en ingles, en
> donde meto esto?
> digo, si no es mucho abuso
>

No, no lo es :-)

Lo primero: el código debería funcionar sin problemas en la versión inglesa
de Excel. Sobre la forma de implementarlo, estos son los pasos:

- con el libro abierto, pulsa Alt + F11 para entrar en el editor de VBA
- en la ventana "Proyecto" (normalmente a la izquierda), doble click en el
nombre de la hoja
- pega el código en la ventana de código (la más grande)

Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Target.Parent.Range("A2:A10")) Is
Nothing Then Exit Sub

Application.EnableEvents = False
Target.Offset(, 1) = Now
Application.EnableEvents = True
End Sub

Ten en cuenta que, tal como está el código, la fecha y hora serán puestas
automáticamente en el rango B2:B10 cada vez que se modifique la misma celda
del rango A2:A10. Tendrás que modificarlo para que haga lo que necesites (o
dínoslo y te lo modificamos nosotros).
Un saludo.


Fernando Arroyo
MS MVP - Excel