Ciao. Ti rispondo al volo perchè sta per iniziare il secondo tempo della juve.
Non potresti fare un semplice controllo sul valore del campo e in base a quello generare la stringa SQL?

se il campo è null
strSQL = "select * from tabella "
altrimenti
strSQL = "select * from tabella where..."
fine if
eccetera

edit. Visto che siamo sotto di due reti torno al forum.

Sicuramente lo sai già ma fai attenzione a passare la data nel formato corretto.
Una cosa tipo questa


data > #" & Format(txtData, "mm/dd/yyyy") & "#"