
¿Se puede ejecutar un macros al rellenar un registro en una tabla de access?
Publicado por Cristobal (6 intervenciones) el 18/01/2023 03:25:10
Hola buenas, mi nivel no es muy bueno en access pero he estado tratando de idear un método para validar los registros que se van ingresando en una tabla entre datos del mismo campo, el problema que tengo es saber si es posible ejecutar el macros automáticamente al ingresar un dato en el registro del campo seleccionado. .
La tabla consta de horas acumuladas por vehículos y el registro indica las horas de servicio que se tuvieron durante el día. Por lo tanto se busca verificar que el resto entre el día de hoy y el de ayer tengan un horario de funcionamiento entre 0 y 24 horas A continuación muestro lo que llevo desarrollado.
Me surgen dos problemáticas el probar este método, el primero es que quiero que sea mas sencillo de ejecutar, lo ideal es que se ejecute el macros cada vez que se completa la hora de un vehiculo pero desconozco si es posible lograr eso. El otro problema es que cada vez que se quiera verificar los datos es necesario que se haya ingresado todas las horas de servicio de cada vehículo, puesto que eso posibilita que se guarde el registro completo del día, si no es así los datos reales no son tomados por la tabla.
Espero puedan ayudarme o si me pueden facilitar herramientas que me puedan enseñar les agradecería mucho.
La tabla consta de horas acumuladas por vehículos y el registro indica las horas de servicio que se tuvieron durante el día. Por lo tanto se busca verificar que el resto entre el día de hoy y el de ayer tengan un horario de funcionamiento entre 0 y 24 horas A continuación muestro lo que llevo desarrollado.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub Validacion()
Dim V1 As Variant, V2 As Integer, V3 As Integer
V1 = DLookup("[Veh1]", "Tabla1", "[Fecha] = Date()")
V2 = DLookup("[Veh1]", "Tabla1", "[Fecha] = Date() - 1")
V3 = V1 - V2
MsgBox V1
MsgBox V2
MsgBox V3
If V3 < 0 And V3 > 24 Then
MsgBox "Corregir", V3
Else
MsgBox "Dato ingresado correctamente"
End If
End
Me surgen dos problemáticas el probar este método, el primero es que quiero que sea mas sencillo de ejecutar, lo ideal es que se ejecute el macros cada vez que se completa la hora de un vehiculo pero desconozco si es posible lograr eso. El otro problema es que cada vez que se quiera verificar los datos es necesario que se haya ingresado todas las horas de servicio de cada vehículo, puesto que eso posibilita que se guarde el registro completo del día, si no es así los datos reales no son tomados por la tabla.
Espero puedan ayudarme o si me pueden facilitar herramientas que me puedan enseñar les agradecería mucho.
Valora esta pregunta


0