Access - CAMPO

 
Vista:

CAMPO

Publicado por CARLOS (113 intervenciones) el 18/11/2004 13:50:11
Hola amigos necesito su ayuda como hago para que un campo escoga el valor anterior de otro campo automaticamente.

Es el valor campo1 a las 2:00 escoja el valor del campo2 a las 1:00

Cualquier cosa me dice les enviarea aun ejemplo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Cómo hacer que un campo tome el valor anterior de otro campo automáticamente

Publicado por Alejandro (4142 intervenciones) el 17/05/2023 16:44:52
Para hacer que un campo tome automáticamente el valor anterior de otro campo en Access, puedes utilizar una combinación de eventos y código VBA. Aquí tienes un ejemplo de cómo lograrlo:

1. Abre el formulario en el modo de diseño.
2. Selecciona el campo "Campo1" y ve a la pestaña "Eventos" en la ventana de propiedades.
3. Haz doble clic en el evento "Al perder el foco" para abrir el editor de código VBA.
4. En el editor de código, escribe el siguiente código:

1
2
3
Private Sub Campo1_LostFocus()
    Me.Campo1 = DLookup("Campo2", "TuTabla", "Fecha = Date() - 1# AND Hora = #1:00:00 AM#")
End Sub

Asegúrate de reemplazar "Campo1" con el nombre del campo que deseas que tome el valor anterior, "Campo2" con el nombre del campo del cual deseas tomar el valor anterior y "TuTabla" con el nombre de tu tabla.

En este ejemplo, se utiliza la función DLookup para buscar el valor del campo "Campo2" en la tabla "TuTabla" donde la fecha sea el día anterior (Date() - 1#) y la hora sea 1:00 AM (#1:00:00 AM#).

5. Guarda y cierra el editor de código VBA.
6. Guarda el formulario y pruébalo.

Cuando el usuario pierda el foco en el campo "Campo1" (por ejemplo, al hacer clic fuera del campo o moverse a otro campo), se ejecutará el evento y el campo "Campo1" tomará el valor del campo "Campo2" correspondiente a la fecha anterior y la hora deseada.

Espero que esto te ayude a resolver tu problema.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar