Visualizar subinforme en informe a través de opción en formulario
Publicado por Carlos (22 intervenciones) el 22/03/2020 16:22:38
Buenas,
Tengo un formulario con con un cuadro de lista con los nombres de distintos informes que al pulsar desde el formulario me permite visualizar para imprimir
Private Sub CuadroCombinado482_Click()
DoCmd.OpenReport Me.CuadroCombinado482.Column(1), acViewPreview
End Sub
y los informes que visualizo tienen un subinforme asociado que siempre tiene datos, los datos son los nombres de los pacientes que tiene dieta.

Al cuadro de liste e añadido una ordenes para que me muestra un cuadro de opciones Si o No, con la idea de que si fuera SI, imprima el informe + el subformulario y fuera NO que el informe se imprima sin el subformulario.

La cuestión es que se que en el informe en al cargar debería especificar las ordenes de si es Si, que se vea el subinforme y se es NO que no se vea el subinforme.
Alguien me puede ayudar.
Gracias
Saludos
Tengo un formulario con con un cuadro de lista con los nombres de distintos informes que al pulsar desde el formulario me permite visualizar para imprimir
Private Sub CuadroCombinado482_Click()
DoCmd.OpenReport Me.CuadroCombinado482.Column(1), acViewPreview
End Sub
y los informes que visualizo tienen un subinforme asociado que siempre tiene datos, los datos son los nombres de los pacientes que tiene dieta.

Al cuadro de liste e añadido una ordenes para que me muestra un cuadro de opciones Si o No, con la idea de que si fuera SI, imprima el informe + el subformulario y fuera NO que el informe se imprima sin el subformulario.
1
2
3
4
5
Private Sub CuadroCombinado482_Click()
If MsgBox("Quieres imprimir con subformulario", vbYesNo + vbQuestion, "Confirmación") = vbYes Then
DoCmd.OpenReport Me.CuadroCombinado482.Column(1), acViewPreview
End If
End Sub

La cuestión es que se que en el informe en al cargar debería especificar las ordenes de si es Si, que se vea el subinforme y se es NO que no se vea el subinforme.
Alguien me puede ayudar.
Gracias
Saludos
Valora esta pregunta


0