RE:Cómo hacer busquedas por fecha
On Error Resume Next
Dim Resultado As Variant
Resultado = "SELECT Fecha, Albaran, Horas_Nor, Horas_Ext, Horas_Noc, " _
& "Horas_Fes, Dietas, " _
& "Comida, Cena, Hospedaje, Otros, Coche_Dia, Coche_Km " _
& "FROM Partes WHERE Fecha BETWEEN # " & Text1.Text & "# And #" & Text2.Text & "# "
'o puedes utilizar esta tambien
'Resultado = ("SELECT * FROM Partes WHERE Fecha >= # " & Text1.Text & "# And Fecha <= # " & Text2.Text & "# ")
Datos2.RecordSource = Resultado
Datos2.Refresh
utliza un MSHFlexgrid o un DBGRID para visualizar los resultados
espero que te sirva de ayuda
Un saludo.