Access - grabar campos de subformulario

 
Vista:

grabar campos de subformulario

Publicado por Antonio (25 intervenciones) el 06/02/2001 12:09:51
Hola,
Tengo un subformulario basado en una tabla (tabla2) en el cual visualizo mediante elecciones campos de otra tabla (tabla1)y quisiera que estos campos visualizados se me grabasen en la tabla2.
¿cómo lo puedo hacer?
Gracias
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

grabar campos de subformulario

Publicado por Alejandro (4142 intervenciones) el 14/04/2023 17:46:01
Para grabar los campos de la tabla1 en la tabla2 desde el subformulario, puedes agregar un botón "Guardar" en el subformulario y utilizar código VBA para realizar la acción.

Aquí te muestro un ejemplo de código que podrías utilizar:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub btnGuardar_Click()
    Dim rstTabla2 As DAO.Recordset
    Set rstTabla2 = Me.RecordsetClone
 
    rstTabla2.MoveFirst
    Do Until rstTabla2.EOF
        rstTabla2.Edit
        rstTabla2!Campo1 = Me.Campo1
        rstTabla2!Campo2 = Me.Campo2
        'Aquí agrega los campos que deseas guardar de la tabla1 en la tabla2'
        rstTabla2.Update
        rstTabla2.MoveNext
    Loop
    rstTabla2.Close
    Set rstTabla2 = Nothing
End Sub

En este ejemplo, el botón "Guardar" copiará los valores de los campos de la tabla1 (en este caso, Campo1 y Campo2) en los campos correspondientes de la tabla2. Puedes ajustar el código para agregar más campos si es necesario.

Es importante mencionar que este código supone que la tabla2 está abierta y se encuentra en modo edición cuando se presiona el botón "Guardar". Si la tabla2 no está abierta en el momento en que se hace clic en el botón, se producirá un error.
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