Access - Sincronizar subformularios

   
Vista:

Sincronizar subformularios

Publicado por Miguel Zurita (4 intervenciones) el 24/01/2008 14:22:27
Hola a todos, quisiera como puedo resolver la siguiente duda:
Tengo dentro de un formulario, 2 subformularios, entonces como puedo hacer que al navegar por el primer subformulario el segundo subformulario muestre informacion correspondiente a ese cliente (sincronizar ambos subformularios)

Gracias a todos
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

RE:Sincronizar subformularios

Publicado por AleC (24 intervenciones) el 27/01/2008 21:18:36
Normalmente, si montas este tipo de formularios compuestos con el asistente de Access, esta conexión te la realiza automáticamente el generador de formularios. Si no te cuesta mucho crear el formulario de nuevo lo comprobarás.

Si te cuesta mucho crear el formulario mi consejo es el siguiente.

En el primer formulario tienes que tener en cuenta el campo clave del cliente. Tú sabrás cuál es. Ese mismo campo debe aparecer en el segundo formulario. Imagínate que se llama CodCliente ¿vale?.

Pues bien, en el formulario primero, en el evento Current, debes establecer un filtro al segundo formulario por el CodCliente.

Tiene que ser algo parecido a esto:

Private Sub Current()

on error goto errCurrent

Dim strFiltro as string
Dim oFormularioPrincipal as object

'Monto la condición del fitro por el campo clave.
strFiltro = "CodCliente = " & me.CodCliente

'Con esto se captura la referencia del formulario que llama a este.
set oFormularioPrincipal = Me.Parent

'Aquí modifica SegundoFormulario por el nombre tu segundo formulario.
oFormularioPrincipal("SegundoFormulario").Filter = strFiltro
oFormularioPrincipal("SegundoFormulario").FilterOn = true


Exit_Current:
set oFormularioPrincipal = nothing
Exit Sub

errCurrent:
msgbox err.Description
Resume Exit_Current
End Sub
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