Llego a las 7:45 todas las mañanas y salgo a las 17:45. Salida a las 17:45. (Puedo hacer clic con el mouse, pero no puedo escribir la hora).

Si CDate(time) >= CDate("07:45:00") y CDate(time) < CDate("07:45:05")

'Ir para trabajar Check in

End If

If CDate(time) >= CDate("07:45:00") and gt;= CDate("17:45:00" ) y CDate (hora) < CDate("17:45:05")

'Registrar después de salir del trabajo

Finalizar si

Retraso 1000 ' Verifique una vez por segundo y puede extenderse para evitar recordatorios repetidos. Recordatorio

Bucle