Filtro formulario
Tengo el siguiente código al abrir un formulario llamado "protocolo0" que a su vez tiene subformularios dependientes: (la estructura es protocolo0 con relación uno a varios con protocolo1 con relación uno a varios con protocolo2 con relación uno a varios con protocolo3)
Private Sub Ir_Click()
On Error GoTo Err_Ir_Click
Dim stdocname As String
Dim stlinkcriteria As String
Select Case Me!listados
Case 1
stdocname = "protocolo00"
stlinkcriteria = "[Id protocolo0 contenidos]= forms![contenidos gestión]![id suplidos contenidos]"
DoCmd.Openform stdocname, , , stlinkcriteria, acFormEdit
Case 2
stdocname = "protocolo0"
DoCmd.Openform stdocname, , , , acFormEdit
stlinkcriteria = "[Id protocolo0 contenidos]= forms![contenidos gestión]![id suplidos contenidos]"
DoCmd.Openform stdocname, , , stlinkcriteria
End Select
DoCmd.Close acForm, "protocolo formulario", acSavePrompt
Exit_Ir_Click:
Exit Sub
Err_Ir_Click:
MsgBox Err.Description
Resume Exit_Ir_Click
End Sub
El problema me viene porque quiero cambiar el filtro y hacer que en ambos caso me abra el mismo formulario protocolo0 (pues protocolo00 es igual solo que en el subformulario dependiente protocolo3 le tengo puesto que el campo hecho sea No). Mi problema viene, que no se como decirle al filtro el camino para que llegue a la tabla protocolo3 campo hecho y me filtre a No. Es decir algo así pero que funcione:
Case 1
stdocname = "protocolo0"
stlinkcriteria = "[Id protocolo0 contenidos]= forms![contenidos gestión]![id suplidos contenidos] and [protocolo3.hecho]=No".
Private Sub Ir_Click()
On Error GoTo Err_Ir_Click
Dim stdocname As String
Dim stlinkcriteria As String
Select Case Me!listados
Case 1
stdocname = "protocolo00"
stlinkcriteria = "[Id protocolo0 contenidos]= forms![contenidos gestión]![id suplidos contenidos]"
DoCmd.Openform stdocname, , , stlinkcriteria, acFormEdit
Case 2
stdocname = "protocolo0"
DoCmd.Openform stdocname, , , , acFormEdit
stlinkcriteria = "[Id protocolo0 contenidos]= forms![contenidos gestión]![id suplidos contenidos]"
DoCmd.Openform stdocname, , , stlinkcriteria
End Select
DoCmd.Close acForm, "protocolo formulario", acSavePrompt
Exit_Ir_Click:
Exit Sub
Err_Ir_Click:
MsgBox Err.Description
Resume Exit_Ir_Click
End Sub
El problema me viene porque quiero cambiar el filtro y hacer que en ambos caso me abra el mismo formulario protocolo0 (pues protocolo00 es igual solo que en el subformulario dependiente protocolo3 le tengo puesto que el campo hecho sea No). Mi problema viene, que no se como decirle al filtro el camino para que llegue a la tabla protocolo3 campo hecho y me filtre a No. Es decir algo así pero que funcione:
Case 1
stdocname = "protocolo0"
stlinkcriteria = "[Id protocolo0 contenidos]= forms![contenidos gestión]![id suplidos contenidos] and [protocolo3.hecho]=No".
{"Lat":38.9796952192906,"Lng":-3.93585205078125}
1 respuesta
Respuesta de dayvitt
1