Problemas con los filtro con fecha!

[quatress]

Hola gracias por responder tan rápido.. Como veras estoy teniendo un problema.. Empesé por la linea mas simple y no da, tira error "Error 3001: Argumentos incorrectos, fuera del intervalo permitido o en conficto con otros.".. En que me estaré equivocando??, te paso el código por si ves alguna anomalía!!..

'CODIGO ==================================
Dim FechaInicial As Date
Dim FechaFinal As Date
Dim CampoFecha As String

FechaInicial = CDate("01/01/2007")
FechaFinal = Format(Now, "dd/mm/yyyy")
CampoFecha = grid2.Columns(6).Caption

'Adodc1.Recordset.Filter = "Select * From tabla Where " & grid2.Columns(6).Caption & " Between #" & FechaInicial & "# And #" & FechaFinal & "#"
Adodc1.Recordset.Filter = "SELECT * FROM tabla WHERE " & CampoFecha & " <=#01/01/2005#"
'===================================

PD1: grid2.Columns(6).Caption corresponde al nombre de la columna que contiene las fechas...

PD2: cambie tabla por el nombre de mi tabla que es "Encargos" y tampoco da!..

Saludos y gracias nuevamente!!!