Access - Problema para filtrar entre fechas

Veamos, mi problema es el siguiente:
Parto de un formulario en el que hay dos campos de fecha y un boton.
Quiero que al pulsar el boton se lance un informe entre dos fechas. Hasta ahora (me funcionaba) lo hice añadiendo en la consulta, en el campo de fecha, lo siguiente:

Entre [Forms]![FormProyectos]![FechaInicio] Y [Forms]![FormProyectos]![FechaFin]

pero ahora despues de haber añadido algunos campos mas a la consulta me da un error:

Microsoft Jet no reconoce lo anterior como una expresión valida.

Este error ya lo habia solucionado en otros casos cambiando el evento click del boton por algo de este tipo:

stDocName = "Informe FormProyectos"
DoCmd.OpenReport stDocName, acPreview, , "[proyecto]=""" + Me.Proyecto + """"

Pero el problema es que ¡no se como hacer esto para filtrar entre dos fechas!, es decir, necesito el codigo equivalente al de arriba para que al hacer click en el boton me abra el informe entre dos fechas.

Si me podeis echar una mano os estaria muy agradecido.
Un saludo a todos, Danny.

Private Sub Comando1_Click()
On Error GoTo Err_Comando1_Click
' Fecha: Fecha por comparar (Definida en origen de datos del informe)
' Fecha1: Fecha de Inicio o Fecha Menor (Definidas en el formulario)
' Fecha2: Fecha de Final o Fecha Mayor (Definidas en el formulario)

Dim stDocName As String
Dim Criterio As String
Criterio = "Fecha >=" & "#" & Fecha1 & "#" & " and " & "Fecha <=" & "#" & Fecha2 & "#"
stDocName = "Asientos_Diario_Contabilidad"
DoCmd.OpenReport stDocName, acPreview, , Criterio

Exit_Comando1_Click:
Exit Sub

Err_Comando1_Click:
MsgBox Err.Description
Resume Exit_Comando1_Click

End Sub

Muchas gracias Gustavo, era exactamente lo que buscaba. Lo he probado y va como la seda.
Un saludo.