Hora automatica

"Age" escribió en el mensaje news:

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ó:

El código debería funcionar en el Excel en español (a mí me funciona).

Si has seguido los pasos que exponía en mi mensaje anterior, el problema quizás sea que tienes establecido el nivel de seguridad para las macros (Herramientas->Macros->Seguridad) en 'Alto' o 'Muy alto'. Si fuera así, te aconsejo que lo pongas en 'Medio' porque si no no se ejecutará nigún código que no vaya firmado. Si no fuera esto, dílo y yo subiré a la red un libro de ejemplo con el código funcionando.
Un saludo.


Fernando Arroyo
MS MVP - Excel

Que tal fernando, ya funciona perfecto, solo tengo una duda, que puedo hacer
para que... dejame poner lo que quiero hacer:

Necesito llevar una vitacora de un proceso de flujo de información.

Lo que quiero hacer es una matriz donde se inserte el dato en la celda A2 y
se ponga automatico la fecha y hora en que se puso (hasta ahi es la macro que
mencionas)

Solo que ahora mi inqietud es que ya no se pueda modifcar la celda la celda
A2 una vez que se puso el dia y hora de modificación!!

se puede hacer algo al respecto?

Gracias

"Fernando Arroyo" escribió:

"Age" escribió en el mensaje news:
> 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ó:
>

El código debería funcionar en el Excel en español (a mí me funciona).

Si has seguido los pasos que exponía en mi mensaje anterior, el problema quizás sea que tienes establecido el nivel de seguridad para las macros (Herramientas->Macros->Seguridad) en 'Alto' o 'Muy alto'. Si fuera así, te aconsejo que lo pongas en 'Medio' porque si no no se ejecutará nigún código que no vaya firmado. Si no fuera esto, dílo y yo subiré a la red un libro de ejemplo con el código funcionando.
Un saludo.


Fernando Arroyo
MS MVP - Excel

Si te refieres a que la celda de la columna B sea actualizada tan sólo la primera vez que se modifica la columna A, prueba con:

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

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


Si te refieres a que no pueda ser modificada a mano, entonces tendrás que proteger la hoja, pero además habría que modificar el código para que fuera capaz de desproteger la hoja, escribir la fecha y hora (cuando tuviera que hacerlo) y volver a protegerla...
Un saludo.


Fernando Arroyo
MS MVP - Excel

"Age" escribió en el mensaje news:

Que tal fernando, ya funciona perfecto, solo tengo una duda, que puedo hacer
para que... dejame poner lo que quiero hacer:

Necesito llevar una vitacora de un proceso de flujo de información.

Lo que quiero hacer es una matriz donde se inserte el dato en la celda A2 y
se ponga automatico la fecha y hora en que se puso (hasta ahi es la macro que
mencionas)

Solo que ahora mi inqietud es que ya no se pueda modifcar la celda la celda
A2 una vez que se puso el dia y hora de modificación!!

se puede hacer algo al respecto?

Gracias

"Fernando Arroyo" escribió:

La verdad no entiendo mucho de programacion pero necesito controlar
asistencia de empleados, y tu Fernando eres "mi tabla de salvacion" me
podras ayudar? especificamente esto es lo que necesito

En una columna que se registre manualmente el numero de empleado al momento
de llegar a laborar, en la siguiente columna automaticamente agrega la fecha
y en la otra automaticamente la hora del registro, seria fantastico que
fuera tan inteligente y que me pusiera tambien el nombre del dia. (Lunes,
Martes, etc) se puede poner tambien solo el nombre del empleado al poner su
numero? y cuando se va escribe nuevamente su numero de empleado y quedan
registrados sus datos de salida.

La semana laboral es de Lunes a Viernes de 8:30 am a 6:30 pm ahora bien,
necesito saber si se va antes o despues de este rango de horario y que me de
la diferencia en tiempo para considerar si tiene tiempo extra o tiempo en
contra por salida temprana, esto es una parte de lo que necesito.

La otra situacion seria la impresion del reporte, para que sea de mas facil
lectura que agrupara por numero de empleado todos sus registros para poder
interpretarlos mas facilmente.

En el lugar donde trabajo la semana empieza en Jueves y se cierra en
Miercoles, sabado y domingo no se labora.


Muchisimas gracias

Algo que seri muy bueno seri que una vez colocado la modificacion a la celda
(no tanto modirifcar sino escribir por primera vez), ya no se pueda modifcar
despues, es decir proteger la celda contra modifciaciones futuras. se puede
hacer eso?

"Fernando Arroyo" escribió:

Si te refieres a que la celda de la columna B sea actualizada tan sólo la primera vez que se modifica la columna A, prueba con:

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

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


Si te refieres a que no pueda ser modificada a mano, entonces tendrás que proteger la hoja, pero además habría que modificar el código para que fuera capaz de desproteger la hoja, escribir la fecha y hora (cuando tuviera que hacerlo) y volver a protegerla...
Un saludo.


Fernando Arroyo
MS MVP - Excel

"Age" escribió en el mensaje news:
> Que tal fernando, ya funciona perfecto, solo tengo una duda, que puedo hacer
> para que... dejame poner lo que quiero hacer:
>
> Necesito llevar una vitacora de un proceso de flujo de información.
>
> Lo que quiero hacer es una matriz donde se inserte el dato en la celda A2 y
> se ponga automatico la fecha y hora en que se puso (hasta ahi es la macro que
> mencionas)
>
> Solo que ahora mi inqietud es que ya no se pueda modifcar la celda la celda
> A2 una vez que se puso el dia y hora de modificación!!
>
> se puede hacer algo al respecto?
>
> Gracias
>
> "Fernando Arroyo" escribió:
>