Filtrar informe Rango de Fechas Vb access

Estoy intentando filtrar un informe y me estoy volviendo loco con las fechas.

El problema es que consigo filtrar en el rango de fechas que le indico, pero también debo incluir las que tengan FechaS nulo, y ahí me da error "No Coinciden los tipos de datos"

Te copio la linea donde escribo los criterios.

MiCriterio2 = "FechaS>=#" & Format(Me!FechaI, "m-d-yy") & "# And FechaS<=#" & Format(Me!FechaF, "m-d-yy") & "# Or (isNull(FechaS) or FechaS='')"

1 Respuesta

Respuesta
1

El formato de fechas en VBA es #mm/dd/aaaa#, cualquier otro formato no lo trata de forma correcta.

Prueba lo siguiente:

MiCriterio2 = "FechaS >= #" & Format(Me!FechaI, "mm/dd/yyyy") & "# And FechaS <= #" & Format(Me!FechaF, "mm/dd/yyyy") & "# Or (or Not IsDate(FechaS))"

Buenos días,
Al final conseguí realizar el filtro correctamente pero la cosa se complicaba ya que actuaban un montón de criterios distintos y no conseguía cumplirlos todos... Publique una pregunta general con todo el código.


De todas maneras tendré en cuenta tus aclaraciones sobre las fechas, siempre me han dado problemas.


Saludos!! y gracias.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Reporte con filtro

Tengo un formulario en donde capturo información de fechas de ingreso y salida y claves, de documentos, lo que quiero es que al imprimir el informe de este formulario me pida la fecha de ingreso para que solo obtenga los registros que tengan esta...
1 respuesta

Filtrar fechas en SyBase

Desde Visual Basic, accedo a una base de datos SyBase vía ODBC. Necesitaría saber en qué formato tengo que pasarle una fecha en una cláusula WHERE de una instrucción SELECT. Es decir, si para Access, el formato sería: WHERE FECHA = #06/01/2003# para...
1 respuesta

Consulta sobre el criterio de búsqueda en Microsoft Access

Tengo que hacer una consulta donde el criterio de búsqueda es entre #01/02/2010 # y #28/02/2010# El problema es que muchos de esos campos no tienen fecha, están en blanco y no me filtra la búsqueda, ¿Qué puedo hacer?
3 respuestas

Problemas con fechas en SQL Server en ingles

Tengo una aplicación desarrollada en ASP que ataca a una BBDD SQL server en ingles (en un proveedor de Servicios). Cuando introduzco una fecha en formato dd/mm/aaaa se guarda bien, pero al mostrarla en otra pantalla pasan dos cosas: 1) Si el día es...
2 respuestas

Utilizar criterios en formularios e informes

Tengo una Consulta en Access 97, en la que aplico un criterio para establecer la fecha inicial y la fecha final en un formulario. (Solo muestra los registros entre dichos rangos) El problema que tengo es que al querer imprimir un registro desde este...
1 respuesta

Access SQL consulta de lapso de fecha y hora no me funciona con variables Ayuda!

Requiero hacer una consulta que me muestre los registros de un lapso de tiempo con hora Tengo cuatro cuadros de texto donde se recoge los criterios: txtFECHA_INIC txtFECHA_TERMI TxtHoraIni TxtHoraTerm patosql = "SELECT Sum([Total])AS SumaTotal FROM...
1 respuesta

Filtros en subform concampos si/no para emitir informe

Tengo una cuestión relacionada con filtros e informes. Dispongo de una base de datos Access con dos tablas: por una parte, una con los datos personales de socios (num socio, dni/nif, apellidos, nombre, domicilio, etc) y otra con las cuotas que pagan...
1 respuesta

Consulta por rango de fechas

La consulta es muy simple pero no me esta funcionando. Tengo una tabla en la que almaceno mediante un formulario, toda la materia prima egeresada de una bodega. Necesito hacer un formulario que me permita mostrar solo los egresos que correspondan a...
1 respuesta

Consulta sql

Mi pregunta es sobre sql Tengo un formulario(clientes) con un subformulario(Subform) y dos cuadros de texto(text1 y text2). Quiero poner un rango de 2 fechas en los 2 textos(una fecha en cada uno) Quiero que al oprimir un botón lea las fechas que...
1 respuesta

Problema al ejecutar macro para filtrar rango de fechas

Tengo la siguiente Macro Sub filtrarfechas() fecha1 = InputBox("Fecha de inicio") If Not IsDate(fecha1) Then Exit Sub fecha1 = Format(fecha1, "dd/mm/yyyy hh:mm") fecha2 = InputBox("Fecha final") If Not IsDate(fecha2) Then Exit Sub fecha2 =...
1 respuesta