Una nueva cuestión que tengo al realizar un filtro mediante varios combos. Uno de ellos tiene valores booleanos (si, no). y al montar el filtro siempre me da error de valores no coinciden.

Este es una parte del código que tengo:

    End If

donde vDigitalizada es de tipo string, Digitasl y vDigital boolean.

Supongo que el problema esta en la parte de "and [Digital]=  vDigital  ", he probado varias combinaciones pero no atino a dar con la sintaxis correcta. 

Un saludo

CFiltro = CFiltro & " AND Digital <> 0"

  else

CFiltro = CFiltro & " AND Digital = 0"

End If 

En la pelea con distintos tipos de BD's ya me he acostumbrado a trabajar con el valor 0 = false y distinto de cero = True.

Aparte de coincidir con Jesús en la creación de filtros booleanos, tu error podría estar en la concatenación para crear la cadena de filtro:

CFiltro = CFiltro & " and [Digital] = " & vDigital

Error 1 (posible): que CFiltro no acabara en un espacio y esa concatenación uniría "and" a la última palabra de la cadena CFiltro.

Error 2 (seguro): al tener el vDigital dentro de la cadena, no tiene ni idea de que le estás hablando

Error 3 (probable): la creación de cadenas de ese tipo pueden generar errores raros porque se pueden crear como Verdadero o True, cosa que Access no es capaz de asociar que son los mismos valores.

En definitiva, la opción que planta Jesús. Fíjate en todo lo que te ahorras. Tu tienes 9 líneas de código (+ la declaración de vDigital); Jesús solo 3.

Si quieres rizar el rizo, en 1 sola línea:

CFiltro = CFiltro & " AND Digital " & Iif(Nz(vDigitalizada, "") = "Si", "<>0", "=0")

Un saludo

Probado con el código de Jesus y funciona correctamenet. Y si repasando todas las pruebas que he hecho hacia cosas raras con este tipo de datos.

Gracias y un saludo