imprimir formulario filtrado desde informe

07/06/2012 - 09:54 por Victor | Informe spam
Buenos dias. Office 2010
Tengo un formulario (que se nutre de una consulta)con su "vista predeterminada" en "Hoja de datos" el cual aplico filtros (como si de una hoja de excel se tratara) y deseo que este filtrado poderlo imprimir (claro, atraves de un informe). Como esta en Hoja de Datos, lo que hago es crear otro formulario, donde incrusto el subformulario y le añado un botón. Conseguir que este botón me abra el informe no es un problema (el informe es copia exacta del subformulario que filtro), pero mi problema esta en que no consigo que el informe me muestre a imprimir los campos filtrados, sino que me los muestra todos (perdiendo su funciona en este caso).

He estado mirando mucho, lo he hecho de varias maneras y en varias ocasiones (con lo cual he aprendido mucho y visto varias formas) y ultimamente he visto una atraves de codigo apareciendo este codigo modelo como una buena opción, pero... no consigo que me funcione.

¿Alguien me podría ayudar? Dado que no encuentro el hilo que lo detallen hasta el punto de que yo lo pueda reproducir satisfactoriamente.

El codigo que intento y no me funciona:

Private Sub Comando20_Click()
Dim criterio As String
If Me.FilterOn Then
criterio = Me.Filter
Else
criterio = ""
End If
DoCmd.OpenReport "Inf_ListadoCURSOS", acViewPreview, criterio
End Sub

Como detalle decir lo siguiente (uno ya no sabe si esto pueda ser de ayuda):
La consulta se nutre de 3 tablas conectadas. No me da esto problemas en ningun otro sitio (es decir, tengo una tabla "pacientes" otra "telefonos" y otra "tratamientos" de tal forma que cada paciente tiene asociado 1 o varios telefonos y a su vez 1 o varios tratamientos).

Gracias

Preguntas similare

Leer las respuestas

#1 José Mª Fueyo
07/06/2012 - 10:06 | Informe spam
Hola
Sí imprimes el valor de la variable en la ventana de inmediato (debug.print criterio), ¿que sale?

Salu2
José Mª Fueyo
[MS MVP Access]
Respuesta Responder a este mensaje
#2 Victor
07/06/2012 - 10:17 | Informe spam
Gracias Jose Mª,
pero no entiendo lo que me quieres decir, (y por ende no sé que responderte).

Como consigo hacer lo que me pides.

Gracias
Respuesta Responder a este mensaje
#3 José Mª Fueyo
07/06/2012 - 10:25 | Informe spam
Hola de nuevo
Prueba con:

DoCmd.OpenReport "Inf_ListadoCURSOS", acViewPreview, ,criterio

y mira un poco la ayuda del método OpenReport
Salu2
José Mª Fueyo
[MS MVP Access]
Respuesta Responder a este mensaje
#4 José Mª Fueyo
07/06/2012 - 10:30 | Informe spam
Hola
Poniendo antes de la linea de DoCmd eso, Debug.Print criterio.
De esa forma puedes ver el valor de esa variable de texto.
De todos modos, te he mandado otro mensaje previo.

Salu2
José Mª Fueyo
[MS MVP Access]
Respuesta Responder a este mensaje
#5 José Mª Fueyo
07/06/2012 - 10:46 | Informe spam
Hola de nuevo.
Parece que se ha perdido la respuesta. Prueba esto:

DoCmd.OpenReport "Inf_ListadoCURSOS", acViewPreview, ,criterio

Salu2
José Mª Fueyo
[MS MVP Access]
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida