Filtrar Informe Cuadro Combinado y Cuadros de Texto (Error 13)
Publicado por José Maria (139 intervenciones) el 14/05/2015 12:47:09
Muy buenas estoy intentando Filtrar un Informe por un Cuadro Combinado y 2 cuadros de texto con Fechas.
Si lo hago por Separado, es decir por un lado que me filtre por el cuadro combinado y otro botón con los cuadros de textos que tienen las fechas no tengo problema, pero si lo intento con los 2 a la vez si.
El Código que pongo es el siguiente:
Me devuelve el Error 13 por los tipos de datos, pero por separado si funciona?
Que es lo que falla?
Muchas Gracias de Antemano.
Si lo hago por Separado, es decir por un lado que me filtre por el cuadro combinado y otro botón con los cuadros de textos que tienen las fechas no tengo problema, pero si lo intento con los 2 a la vez si.
El Código que pongo es el siguiente:
1
2
3
4
5
6
7
8
Dim VTrabajador As Integer, vIni As Date, vFin As Date
VTrabajador = Me.Cuadro_combinado6
vIni = Me.Fecha1.Value
vFin = Me.Fecha2.Value
DoCmd.OpenReport "Informe_Pendiente_pagos", acViewReport, , "Id_Trabajador=" & VTrabajador And "[Fecha_Finalizacion]>=#" & Format(vIni, "mm/dd/yy") & "# AND [Fecha_Finalizacion]<=#" & Format(vFin, "mm/dd/yy") & "#"
Me devuelve el Error 13 por los tipos de datos, pero por separado si funciona?
Que es lo que falla?
Muchas Gracias de Antemano.
Valora esta pregunta
0